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Abstract 

The  Coaputer  Center  in  the  Computer  Facilities  Division  of  the 
David  Taylor  Research  Center  has  installed  a  Integrated  Supercomputer 
Network.  This  manual  provides  an  introduction  to  the  new  Network. 

Soae  information  has  been  distilled  from  many  individual  documents  and 
augmented  to  reflect  usage  at  DTRC.  Control  statement  examples  and 
descriptions  of  hardware  and  software  are  included,  as  is  information 
on  moving  files  among  the  CDC  CYBER  860a  (with  the  Hass  Storage  System), 
the  DEC  VAXcluster,  the  DEC  Remote  minis,  and  the  Cray  X-HP,  creating 
and  executing  batch  jobs,  and  using  the  interactive  systems. 


Administrative  Information 

The  work  described  in  this  report  was  performed  in  the  Software 
Branch  (1893)  of  the  Computation,  Hathematics  and  Logistics  Department, 
David  Taylor  Research  Center,  under  the  sponsorship  of  the  DTRC 
Cos^uter  Center  (189) . 
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*****  Introduction  ***** 


The  DTRC  Integrated  Supercomputer  Network  consists  of  a  Cray 
X-MP/24  with  5  front-end  computers:  the  DEC  VAXcluster  (four  proces¬ 
sors:  two  VAX  8550s  and  two  VAX  ll/780s),  and  a  CDC  CYBER  180/860A. 

The  Cray  and  VAXcluster  can  store  and  retrieve  files  on  the  Hass 
Storage  System  (MSS),  which  is  part  of  the  CDC  CYBER  860A.  There  may 
be  several  mini-sites,  each  with  local  processing  capability  as  well  as 
access  to  the  Central  Site  computers.  One  mini-site  is  at  Annapolis. 


The  following  operating  systems  are  in  use: 


Cray  X-MP 

DEC  VAXcluster 

DEC  Remote  Mini  (Annapolis) 

CDC  CYBER  860A 


COS  version  1.16 
VMS  version  4.6 
VMS  version  5.0 
NOS  version  2.5.3 


The  front-end  computers  support  both  batch  processing  of  jobs 
submitted  at  central  site,  through  remote  batch  terminals  or  from 
interactive  terminals;  and  demand  processing,  which  supports  a  variety 
of  interactive  terminals.  In  addition,  batch  jobs  can  be  sent  to  the 
Cray  for  processing  with  the  output  returned  for  examination  or 
printing. 


This  reference  manual  is  designed  to  provide  the  new  user  with 
enough  information  to  use  the  Network  to  run  simple  batch  jobs  and  to 
create  and  run  programs  and  batch  jobs  interactively.  Most  of  the 
frequently  used  control  statements  are  described  in  detail  in 
Appendices  B  and  D.  Magnetic  tapes  are  discussed  briefly.  No  attempt 
is  made  to  describe  all  features  of  the  operating  systems  or  even  all 
parameters  of  the  control  statements  presented.  More  information  can 
be  found  in  the  publications  listed  in  Appendix  F. 

Before  using  the  system,  job  order  number (s)  to  be  charged  must  be 
registered  with  Code  189.3.  Outside  users  must  transfer  funds  to 
DTRC  before  receiving  a  job  order  number.  Each  individual  user  should 
have  4-character  User  Initials  assigned  (also  by  Code  189.3). 
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*** 


Hardware  Configuration 


**  Cray  X-MP  /  24  ** 


Cray  > tat ion  ID:  Cl 

2  X-MP  central  proceeding  units  (117  MFLOPS  each) 
4M  64-bit  words  of  central  aeaory 
4  aodel  DD-49  disk  storage  units  (4.8  Gbytes) 


**  CDC  CYBER  180  aodel  860a  ** 


Network  ID:  MFN 
Cray  station  ID:  N1 

1  CYBER  860A  central  processing  unit  (6.3  aips) 

2M  60-bit  word  aeaory 

25  peripheral  processors 

3  aodel  895  disk  drives 

4  aodel  679-5  nine-track  tape  drives  (1600/6250  cpi) 

2  aodel  679-3  nine-track  tape  drives  (  800/1600  cpi) 

2  aodel  677-3  seven-track  tape  drives 

1  aodel  405  card  reader 

1  aodel  415  card  punch 

2  aodel  585  line  printers  (1200  lpa,  upper/lower  case) 

1  aodel  7990  Mass  Storage  Systea  (210  Gbytes) 

3  aodel  M861  storage  aodules 
1  CDCNET  coaauni cat ions  systea 

16  dial-up  lines  for  ASCII/BCD  4800-baud  terainals 

(202)  227-4740 

56  dial-up  lines  for  1200-/300-baud  interactive  terainals 

(202)  227-4800  (32) 
(202)  227-4850  (16) 
Annapolis  -  x4741  or  x4761  then  56  (8) 
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**  DEC  VAXcluster  ** 


VAXcluatar  nodes:  DTI,  DT2,  DT3,  DT4 
Cray  station  IDs:  V3 

VI,  V2,  V4  (futura) 


2 

2 

2 

9 

1 

3 

2 

3 

1 

1 


VAX  11/780  procassors  (1  slips  aach;  DTI,  DT2)  —  aaeh  with 
16  Mbyta  cantral  nenory 

VAX  8550  procassors  (6  mips  aach;  DT3,  DT4)  —  aach  with 
48  Mbyta  cantral  nenory 

nodal  SA482  disk  storage  array  (5.0  Gbytas) 

nodal  RA81  disk  drivas  (4.1  Gbytas) 

nodal  TA79  nina-track  tapa  drivas  (1600/6250  cpi) 

nodal  TU79  nina-track  tapa  drivas  (1600/6250  cpi) 

nodal  TA78  nina-track  tapa  drivas  (1600/6250  cpi) 

nodal  LP27  inpact  printers  (800  lpn,  uppar/lowar  case) 

nodal  LPll  inpact  printer  (300  lpn,  upper  case) 

DECserver  500  network  taminal  switch 
56  dial-up  lines  £or  4800~/1200-/300-baud  interactive 
tarainals 

(202)  227-5600  (48) 
Annapolis  -  x4741  or  x4761  then  57  (8) 


**  DEC  Renote  Mini  ** 


DECnet  node:  RMl 

Cray  Station  ID:  R1  (futura) 

1  VAX  8250  processor  (1.2  nips) 

16  Mbyta  cantral  nenory 

1  nodal  RA81  disk  drive  (450  Mbytes) 

2  nodal  TU81  nina-track  tapa  drivas  (1600/6250  cpi) 

1  nodal  LP27  inpact  printer  (800  lpn,  uppar/lowar  case) 
8  dial-up  lines  for  4800-/1200-/300-baud  interactive 
terninals 


Annapolis  -  x4741  or  x4761  than  58 
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*** 


The  Integrated  Supercomputer  Network 


*** 


!  Cray 
|  X-MP/24 


MSS 


Cray  HYPER channel 


VAXclueter 


8250  i 

|  780 

!  j  780 

i  |  8550 

|  j  8550 

R1  ! - 

—  |  VI 

!  — !  v2 

! - !  V3 

|  —  |  v4 

RM1  ! 

!  DTI 

!  |  DT2 

!  !  DT3 

!  !  DT4 

User 

Terminals 


Ethernet  to  DDN,  OA  VAXes,  etc. 
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*****  Ueer  Interface  With  the  Coaputer  Center  ***** 


***  General  Information  *** 

The  ADP  Control  Center*  are  located  at  Central  Site  at  Carderock 
and  Annapolis.  You  aay  subait  decks  and  pick  up  output  as  well  as 
obtain  information  on  the  progress  of  your  jobs  froa  an  ADP  Control 
Center. 

Cos^uter  Center  Notes  is  a  publication  sent  to  all  registered 
users  whenever  there  is  information  to  be  disseminated.  The  date  of 
the  latest  news  update  is  printed  at  the  start  of  each  batch  job  (log) 
or  interactive  session.  The  NEWS  command  or  procedure  is  used  to  see 
the  current  news  file. 


***  Registering  *** 

To  register  to  use  Coaputer  Center  computers,  call  our  Business 
Office,  Code  189.3,  at  (202)  227-1361/1910.  Be  prepared  to  supply 

.  your  naae 

.  your  DTRC  code  or  non-DTRC  company  name  and  address 
.  the  job  order  nuaber(s)  to  be  charged  for  coaputer  work 
.  the  computers  on  which  you  which  to  be  registered 
.  Cray  X-MP 
.  DEC  VAXcluster 
.  VAX  at  Annapolis  (RMl) 

.  CDC  CYBER  860 

Registration  for  the  DEC  VAXcluster  or  Cray  X-MP  includes  registration 
for  the  Mass  Storage  Systea  (CDC  CYBER  860) . 

You  will  be  given 


User  Initials  (if  you  are  a  new  user) 

the  initial  passwords  (which  MUST  be  changed  during  your  first 
session)  for  each  coaputer  system  for  which  you  registered 
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***  Passwords,  Passwords,  Everywhere  *** 

Each  computer  systea  has  its  own  password  to  gain  access  to  it  (the 
CDC  CYBER  860A  has  two:  one  for  interactive,  one  for  batch).  You  KUST 
change  these  during  your  first  session  on  each  or  you  will  be  denied 
future  access.  For  security,  you  are  strongly  urged  to  change  your 
access  passwords  as  soon  as  you  can  log  into  each  coaputer.  Passwords 
for  all  our  coaputers  expire  in  90  days. 

To  change  your  access  passwords,  use 

.  Cray  X-MP  (password  is  4-15  characters) 

.  on  the  Cray 

ACCOUNT, AC- j  oborderno , UPW-cur  r ent  jpw , NUPW-new_pw . 

.  froa  the  VAXcluster 

£VS YS : NEWCRAYPW  current_pw  new_pw  new_pw  ac  wait 
See  also  page  2-1-7. 


.  DEC  VAXcluster  (password  is  6-12  characters) 

DEC  VAX  (RM1) 

SET  PASSWORD  < —  you  will  be  proapted  for  your  current 

and  new  passwords 


.  CDC  CYBER  860A  /  MSS  (password  is  4-7  characters) 

.  on  the  860  (interactive  and  batch  —  to  change  both,  enter 
interactively  and  in  a  batch  job) 

PASSWOR,current_pw,new_pw.  < —  batch  or  interactive 
-or- 

PASSWOR.  < —  you  will  be  proapted  for  your  current 

and  new  passwords  (interactive  only) 

.  froa  the  VAXcluster  (both  passwords) 

HFT  PASSWORD  < —  you  will  be  proapted  for  your  current 

and  new  passwords 
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***  Trouble  Font*  *** 

A  Trouble  Fora  is  used: 

1)  for  refund  request* 

2)  when  probleas  are  encountered 

3)  for  suggestions,  gripes  and  coaplaints. 

The  Trouble  Fora  should  include  a  succinct  description  of  the  problea 
and  include  as  auch  documentation  (dayfile  or  log,  listings,  duaps)  as 
possible.  It  should  be  subaitted  to  Code  1893.1  for  processing. 

Trouble  Foras  aay  be  entered  directly  into  the  eoaputer  from  any  of 
the  front-ends  (VAXcluster,  CYBER  860)  using  the  GRIPE  coaaand.  If 
supporting  doeusbentation  is  needed,  please  send  it  to  Code  1893.1  (User 
Services) . 


***  Refunds  *** 

Requests  for  refunds  on  lost  tiae  aust  be  accoapanied  by  output  of 
the  run  and  a  Trouble  Fora,  and  aust  be  reported  within  five  working 
days.  Decisions  on  refunds  will  be  aade  by  Code  189. 

***  ADP  Control  Canter  *** 

The  ADP  Control  Center  has  the  following  capabilities: 

1)  Clean,  test  and  degauss  aagnetic  tapes. 

2)  Process  Calcoap  plots. 

The  following  EAM  facilities  are  available  off-line: 

1)  A  saall  card  interpreter  is  available  at  Central  Site 

2)  Shredder  (available  at  Central  Site) 

See  Appendix  G  for  Coaputer  Center  telephone  nuabers. 
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*****  Software  Available  ***** 

The  following  table  lists  the  major  software  products  and  the 
computers  where  they  are  available.  Type  "HELP  8CCF  Software"  on 
the  VAXeluster  for  the  latest  version  of  this  table. 


DTI 

DT2 

DT3 

DT4 

Cray 

CDC 

11/780 

11/780 

8550 

8550 

X-KP 

860A 

ABAQUS 

X 

X 

X 

X 

X 

- 

ACSL 

- 

- 

X 

X 

- 

- 

ALGOL 

- 

- 

- 

- 

- 

X 

APL 

- 

- 

X 

X 

- 

X 

APT 

— 

— 

— 

— 

— 

X 

Basic 

X 

X 

X 

X 

- 

X 

C  (CC) 

- 

- 

X 

X 

- 

- 

Cal comp 

X 

X 

X 

X 

- 

X 

CM) 

X 

X 

X 

X 

- 

- 

Cobol  (1) 

X 

X 

X 

X 

- 

X 

Datatrieve 

X 

X 

X 

X 

- 

- 

DBMS 

- 

- 

X 

X 

- 

- 

DECalc 

X 

X 

- 

- 

- 

- 

DISSPLA 

X 

X 

X 

X 

X 

(2) 

El SPACE 

X 

X 

X 

X 

X 

(2) 

FMS 

X 

X 

X 

X 

- 

- 

Fortran  (1) 

X 

X 

X 

X 

X 

X 

FTP 

X 

— 

— 

— 

— 

— 

GPSS 

- 

- 

X 

X 

- 

X 

Hasp 

- 

- 

- 

- 

- 

X 

HOTSPOT 

— 

— 

— 

— 

X 

IHSL 

X 

X 

X 

X 

(2) 

X 

INGRES 

— 

- 

X 

X 

- 

- 

Kermit  (1) 

X 

X 

X 

X 

- 

X 

L INPACK 

X 

X 

X 

X 

X 

X 

Macsyma 

X 

X 

- 

- 

- 

- 

Nastran 

- 

_ 

— 

X 

- 

(1)  ~  also  on  RM1  (VAX  8250  in  Annapolis) 

(2)  -  coming 
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DTI 

DT2 

DT3 

DT4 

Cray 

CDC 

11/780 

11/780 

8550 

8550 

X-MP 

860A 

Pascal 

X 

X 

X 

X 

X 

X 

Pat ran 

X 

X 

X 

X 

- 

— 

PCA 

- 

- 

X 

X 

- 

— 

Pert  Tiae 

- 

- 

- 

— 

_ 

X 

PL/ 1 

X 

X 

X 

X 

— 

PLOTIO 

X 

X 

X 

X 

- 

- 

Proj  Mgt  (PM) 

- 

- 

X 

X 

- 

- 

Ria 

X 

X 

- 

- 

- 

- 

Siascript 

— 

_ 

X 

SMP 

X 

X 

X 

X 

- 

SPY 

- 

- 

- 

- 

X 

- 

TELNET 

X 

- 

- 

- 

- 

- 

WIN/TCP 

X 

- 

- 

- 

- 

- 

XMODEM 

- 

_ 

_ 

_ 

_ 

X 
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*****  The  Cray  X-M p  ***** 

The  Cray  X-MP/24  at  DTRC  it  a  powerful,  general  purpoae  computer 
having  two  central  proceeding  unite  (CPUe)  which  ehare  files  and  are 
linked  together.  These  CPUs  ehare  4  million  64-bit  words  of  memory. 
Each  CPU  achieves  its  extremely  high  processing  rate  (up  to  117  MFLOPS 
(million  floating  point  operations  per  second))  using  its  scalar  and 
vector  capabilities. 


***  COS  Version  1.16  *** 

The  operating  system  for  the  Cray  X-MP  at  DTRC  is  the  Cray 
Operating  System  (COS),  version  1.16BF2,  which  supports  both  batch  and 
interactive  processing. 


***  Accessing  the  Cray  X-MP  *** 

Batch  jobs  are  normally  submitted  from  one  of  the  front-ends  using: 
CRAY  SUBMIT  on  the  VAXcluster,  or  CSUBMIT  on  the  CDC  CYBER  860A.  They 
may  also  be  submitted  from  a  running  batch  or  interactive  job  using  the 
Cray  SUBMIT  command. 

Interactive  access  is  also  from  one  of  the  front-ends  using:  CRAY 
INTERACTIVE  on  the  VAXcluster,  or  ICF  (Interactive  Cray  Facility)  on 
the  CDC  CYBER  860A. 

Both  modes  of  access  are  described  later  in  this  chapter. 


***  Cray  Datasets  *** 

On  the  Cray,  information  is  organized  by  COS  into  datasets,  which 
may  be  on  disk,  memory-resident,  or  interactive.  A  dataset  contains 
one  or  more  files  and  may  be  temporary  (available  only  to  the  job  that 
created  it)  or  permanent. 

Each  dataset  has  a  disposition  code  to  tell  COS  what  to  do  with  it 
when  it  is  released.  The  2-eharacter  alphanumeric  disposition  codes 
include  SC  (scratch  -  default),  PR  (print),  IN  (input),  and  ST  (stage 
to  the  front  end) . 

Jobs  access  local  datasets,  which  may  be  temporary  or  permanent. 
Permanent  datasets  are  made  local  by  the  ACCESS  statement.  Front  end 
files  are  made  local  by  the  FETCH  statement. 


Page  2-1-2 


RevO 


8B/10/01 


***  Changing  your  Cray  password  *** 

Your  Cray  access  password  nay  be  changed  £roa  a  batch  job  or 
interactively  on  the  Cray,  or  fron  a  procedure  on  the  VAXcluster  which 
creates  and  subaits  a  Cray  batch  job  for  you. 

Batch: 

$  CRAY  SUBMIT  aynewpw.job 

where  your  file  MYVEWPW. JOB  contains: 

JOB, JN-ssss. 

ACCOUNT ,AC~ac , US“us ,UPW“current_pw,NUPW”new_pw. 


Interactive: 

$  CRAY  INTER  /JN-jobnaae  /US-usernaae 
1 ACCOUNT , AC“ac , US“us , UPW-curr en t_pw , NUPW-new  pw . 
IAZ  <—  ctrl-Z 

CRAY>  QUIT 
CRAY>  EXIT 

$  < —  you  are  back  in  DCL 

-or- 

$  CRAY  INTER 
CRAY>  Jobnaae:  ssss 
CRAY>  Usernaae:  ABCD 
t  as  above 


Via  DCL  procedure  NEWCRAYPW : 

$  @VSYS: NEWCRAYPW  current_pw  new_pw  new_pw  [  ac  ]  [  wait  ] 

where  new_pw  is  entered  twice  for  verification 

ac  is  your  Cray  account  nuaber  (aay  be  oaitted  if  it 
is  the  saae  as  your  current  VMS  login) 

wait  is  WAIT  -  wait  for  the  job  to  coaplete  and 

display  the  .CPR  file 

anything  else  -  to  let  the  job  run  on  its  own 
(you  will  have  file  NUCRPW.CPR 
when  it  eoapletes) 

This  procedure  creates  and  deletes  teaporary  file  N$U$P$W.JOB. 
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***  Batch  Job*  *** 

Cray  batch  joba  are  very  aiailar  to  CDC  batch  joba,  but  with 
different  terainology.  A  batch  job  conaiata  of  one  or  aore  filea. 
The  firat  file  ia  the  JCL  control  atateaent  file.  It  ia  followed  by 
aource  or  data  filea  aa  needed  by  the  JCL  file.  A  typical  job 
conaiating  of  one  aource  and  one  data  file  (*)  look*  like  thia: 

JOB , JN- j obnaae ,.... 

ACCOUNT, AC“j ob_order_nuaber , US-uaernaae , UPW*paaaword. 

< JCL  atateaenta> 

/EOF  <—  end-of-file 

<aource  file> 

/EOF  <--  end-of-file 

<data  file> 


<eod>  < —  end-of-data 

A  Cray  batch  job  haa  at  leaat  four  dataaeta: 

CCS  -  the  control  atateaent  file 

(part  of  $IN,  but  not  aceeaaible  to  the  uaer) 

$IN  -  the  job  input  dataaet.  Aceeaaible  by  ita  local  naae, 

SIN,  or  aa  Fortran  unit  5. 

$OUT  -  the  job  output  dataaet.  Aceeaaible  by  ita  local  naae, 

$OUT,  or  aa  Fortran  unit  6. 

SLOG  -  a  hiatory  of  the  job.  Not  aceeaaible  to  the  uaer.  SLOG  ia 
appended  to  $OUT  when  the  batch  job  terainatee. 


(*)  -  When  executing  aeveral  prograaa  or  one  prograa  aeveral  tiaea,  the 
/EOF  ia  required  only  when  a  prograa  reada  until  end-of-file.  If 
a  prograa  reada  a  apecifie  nuaber  of  data  recorda,  or  haa  ita  own 
paeudo-end-of-file,  the  /EOF  auat  ROT  be  preaent. 
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**  Batch  Job  Classes  ** 

Batch  jobs  fall  into  four  service  classes:  EXPRESS,  NORMAL,  DEFER, 
and  SECURE.  Charges  for  EXPRESS  and  SECURE  are  502  and  252  higher, 
respectively,  than  for  NORMAL;  DEFER  class  charges  are  302  less  than 
NORMAL.  To  specify  the  EXPRESS  or  DEFER  job  class,  use  US-EXPRESS  or 
US-DEFER  on  the  JOB  stateaent.  NORMAL  is  the  default  (provided  the  job 
aeets  the  tiae  and  aeaory  requirements).  SECURE  jobs  may  be  submitted 
only  during  secure  tiae  (see  below) . 

There  are  tiae  and  aeaory  restrictions  on  the  EXPRESS  and  NORMAL 
service  classes.  Jobs  which  request  aore  are  downgraded  one  or  more 
classes.  DEFER  and  SECURE  jobs  have  no  such  restrictions. 

The  following  chart  shows  for  each  job  class:  its  priority,  the 
aaxiaua  number  of  such  jobs  to  be  allowed  to  execute  at  the  same  time, 
and  the  aaxiaua  tiae  (in  decimal  seconds)  and  memory  (maximum  field 
length  in  decimal  words)  requirements. 


requirements 


aaxiaua 


class 

priority 

#  j  obs 

tiae 

memory 

EXPRESS 

10 

15 

T 

< 

1800 

MFL  < 

512K 

T 

< 

600 

MFL  < 

1536K 

T 

< 

60 

up  to 

max  MFL 

(3532800) 

NORMAL 

8 

10 

T 

< 

10800 

MFL  < 

512K 

T 

< 

3600 

MFL  < 

1536K 

T 

< 

600 

up  to 

max  MFL 

(3532800) 

DEFER 

6 

3 

T 

< 

200000 

up  to 

max  MFL 

(3532800) 

SECURE 

- 

- 

T 

< 

200000 

up  to 

max  MFL 

(3532800) 

Interactive 

14 

14 

**  SECURE  Batch  Job  Class  *** 

Classified  processing  may  be  done  on  the  Cray  X-MP  by  making  prior 
arrangement  with  Operations.  When  run  in  "secure  mode",  node  DT3  is 
removed  from  the  VAXcluster.  Access  to  the  Cray  is  available  only  from 
a  terminal  in  the  computer  room.  Batch  jobs  submitted  to  the  Cray  from 
this  terminal  must  have  "US-SECURE"  in  the  job  statement;  jobs  with 
US-EXPRESS,  US-NORMAL,  US-DEFER,  or  with  US-  omitted,  will  be  rejected. 
(Jobs  with  US-SECURE  may  not  be  submitted  during  unclassified  time.) 
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**  From  the  VAXcluater  ** 

To  uae  the  Cray  from  the  VAXcluater,  log  in  to  a  node  which  can 
accaaa  the  Cray,  prepare  your  Cray  batch  job  using  any  editor,  and 
submit  the  job  file(a)  to  the  Cray  using  the  CRAY  SUBMIT  coaaand: 

$  CRAY  SUBMIT  f ilenaae 

or 

$  CRAY  SUBMIT  f ilel , file2, . . . 

where  filename  is  a  VAXcluater  file  containing  the  Cray  job 
(default  file  extension:  .JOB) 

filei  is  a  VAXcluater  file  containing  part  of  the  Cray  job 
filel  -  the  job  control  stateaents 
£ile2  -  the  next  file  in  the  job 

(perhaps  a  Fortran  source  program) 
file3  -  the  next  file  in  the  job 

(perhaps  the  data  for  running  the  program) 

The  output  will  be  returned  to  your  file  jobname.CPR,  where  jobname 
is  taken  from  the  job  statement  of  the  Cray  job  (JN  parameter).  See 
Appendix  C:  CRAY  SUBMIT  to  print  the  output  directly  on  a  VAXcluater 
printer. 

Files  sent  to  the  Cray  aust  not  have  embedded  tabs.  See  Appendix 
C:  DETAB. 


i 
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*  VAXcluster-to-Cray  Exaaplet  * 

1)  $  CRAY  SUBMIT  J0B1 
where  JOB1.JOB  contain*: 

JOB.JN-MYJOB.  (1) 

ACCOUNT, US-usernaae,UPW-password,AC-aecount.  (1) 

CFT.  (1) 

SEGLDR , GO .  (1) 

/EOF 

PROGRAM  ADD  (2) 

DO  10  1-1,5  (2) 

READ  (5,  *)  Nl,  N2,  N3  (2) 

N  -  Nl  +  N2  +  N3  (2) 

WRITE  (6,  *)  Nl,  N2,  N3,  N  (2) 

10  CONTINUE  (2) 

END  (2) 

/EOF 

12  3  (3) 

4  5  6  (3) 

789  (3) 

10  11  12  (3) 

13  14  15  (3) 

/EOF 

will  subait  the  job  to  the  Cray  with  the  output  returned  in  file 
MYJOB.CPR. 

2)  $  CRAY  SUBMIT  RUN2 . JOB , RUN2 . FOR , RUN2 . DAT 

where  RUN2.JOB  contain*  the  job  control  statement*  ((1)  above) 

RUN2.FOR  contain*  the  Fortran  source  prograa  ((2)  above) 

RUN2.DAT  contains  the  data  ((3)  above) 

will  subait  the  coabined  files  to  the  Cray  with  the  output  returned 
in  file  MYJOB.CPR.  Note  that  the  /EOF  records  are  not  required  in 
this  foraat. 
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3)  $  CRAY  SUBMIT  RUN3 


whare  RUN3. JOB  contains: 


JOB.JN-KYJOB. 

ACCOUNT, US-usernaae,UPW-password  AC1 

FETCH , DN-PROC3 , TEXT- ' PROG3 . FOR ’ . 
FETCH, DN-DATA3 , TEXT- ' PROG3 . DAT ' . 

CFT , I-PROG3 . 

SEGLDR, GO. 


account. 


PROG3 . FOR  on  the  VAXcluster  contains 
"OPEN  (5,  FILE-'nATA3 ') "  before  the  1 


the  prograa  (2)  above,  with 
DO  10  ..." 


PROG3.DAT  contains  the  data  (3)  above. 
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**  Pros  the  CDC  CYBER  860A  ** 


To  use  the  Cray  fro*  the  CYBER  860A,  log  in,  prepare  your  Cray 
batch  job  using  any  editor,  and  subait  the  job  file  to  the  Cray  using 
the  CSUBMIT  eoaaand  (see  Appendix  D  for  additional  paraaeters) : 


/CSUBMIT, lfn. 
/CSUBMIT, If n,RB«ANAP. 
/CSUBMIT, lfn, RB-un. 
/CSUBMIT, lfn, TO. 


< —  print  at  Central  Site 
< —  print  at  reaote  batch  terainal  ANAP 
< —  put  into  output  queue  for  user  un 
< —  put  into  your  output  queue 


In  the  last  two  foraats,  use  QGET  to  get  the  file  froa  the  queue.  To 
send  the  output  elsewhere,  use  the  Cray  DISPOSE  eoaaand  (see  Appendix 
B). 


*  CYBER  860A-to-Cray  Examples  * 


1)  /CSUBMIT, RUN1. 

where  local  file  RUN1  contains: 

JOB, JN-ayjob. 

ACCOUNT , US-us ernaae , UPW-pas  sword, AC-account . 

FETCH , DN-prog3 , SDN-aypr og , TEXT* ' GET ,ayprog . CTASK. ’ . 

A —  indirect  file 

FETCH, DN-aydata, TEXT-' ATTACH, aydata. CTASK. ' .  <--  direct  file 

CFT,I-prog3. 

SEGLDR.GO. 


-or- 


JOB , JN-ayj ob . 

ACCOUNT , US-us  ernaae , UPW-pas sword , AC-account . 

FETCH, DN-prog3 , SDN-aypr og , TEXT- ' GET , aypr og . CTASK. ' . 

* —  indirect  file 

ACCESS , DN-PROCLIB , OWN-PUBLIC . 

LIBRARY , DN-PROCLIB : * . 

MSACCES ,  US-us  er ,  MPW-as  pas  s . 

MSFETCH, DN-aydata.  < —  direct  file 

CFT,I-prog3. 

SEGLDR.GO. 

MYPROG  and  MYDATA  on  the  CDC  CYBER  860A  contains  the  prograa  and 
data  (see  page  2-1-6,  exaaple  3). 
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**  Fro»  a  Running  Cray  Job  ** 

A  batch  job  to  b*  aubaittad  froa  a  running  Cray  job  aay  reside 
either  on  the  Cray  or  on  on*  o£  the  front-ends.  Froa  within  the  Cray 
job,  ACCESS  or  FETCH  the  file  to  aake  it  a  local  file,  then  SUBMIT  it 
to  the  COS  input  queue.  (See  Appendix  B  for  additional  paraaeters  for 
these  Cray  coaaands.) 


*  Exaaples  * 

1)  The  job  is  in  a  permanent  dataset  on  the  Cray: 

JOB , . . . . 

ACCOUNT, .... 

*  •  • 

ACCESS , DN-ay j ob , PDN-aypera. j ob . 

SUBMIT, DN-ay job. 


2)  The  job  is  in  a  file  on  the  VAXcluster: 


JOB , . . . . 
ACCOUNT, . . . . 


FETCH, DN-my job, TEXT-' ay job. job' .  < —  submitted  froa  VAXcluster 

-or- 


FETCH, DN-ay job,MF-V3, TEXT- 'DT3"user  pw"::U0n:  [user]ayjob. job ' . 

A —  submitted  froa  CYBER  860 
or  VAXcluster 


SUBMIT, DN-my job. 


3)  The  job  is  in  a  file  on  the  Mass  Store  (CDC  CYBER  860A) : 

JOB , . . . . 

ACCOUNT, _ 


•  *  * 

ACCESS , DN-PROCLIB , OWN-PUBLIC . 
LIBRARY , DN-PROCLIB : * . 

MSACCES , US-us  er , MPW-ms pass. 
MS FETCH , DN-my j  ob . 

SUBMIT, DN-ay job. 
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***  Interactive  Jobe  *** 

Cray  X-MP  interactive  acceec  ie  via  the  Cray  Station  code  on  one  of 
the  front  ends. 


**  Fro*  the  VAXcluster  ** 

The  Cray  X-MP  is  accessed  via  the  VMS  Cray  Station,  which  may  be 
entered  by  the  CRAY  coaaand.  The  INTERACTIVE  Station  cowman d  allows 
interactive  use  of  the  Cray.  You  enter  the  Cray  Station,  request 
interactive  service,  do  your  thing,  leave  Cray  interactive,  terainate 
the  Cray  session  (fro*  the  Cray  Station),  and  leave  the  Cray  Station. 
You  will  then  be  at  the  VMS  proapt. 

The  CRAY  coaaand  puts  you  into  Cray  context  (indicated  by  the  CRAY> 
proapt) . 

Type  CRAY  INTERACTIVE,  or  CRAY  and  then  INTERACTIVE  at  a  CRAY> 
proapt.  You  will  then  be  requested  to  supply: 

CRAY  JOBNAME:  < —  enter  anything  you  wish  as  the  jobnaae  for 

this  session 

CRAY  USERNAME:  < —  enter  your  User  Initials 

You  will  then  be  connected  to  the  Cray  itself,  which  has  an  exclamation 
proapt  (!).  Your  first  coaaand  must  be  your  ACCOUNT  statement.  Any 
other  coaaands  will  be  ignored  until  a  valid  ACCOUNT  stateaent  is  read. 

1 ACCOUNT , AC- 1222233344 , UPW-pw , US-us  er ini t . 

When  you  receive  another  1  proapt,  your  logon  was  successful.  You  aay 
now  use  any  of  the  coaaands  in  Appendix  B.  Every  coaaand  MUST  end  with 
a  terainator  (.);  if  you  forget,  use  the  up-arrow  to  bring  the  coaaand 
back  and  add  the  terainator. 

To  leave  Cray  interactive  teaporarily,  enter  an  end-of-file  (AZ) . 
This  brings  you  back  to  the  Cray  Station  where  you  can  do  any  Station 
coaaand. 

To  terainate  the  Cray  interactive  session,  enter  the  Station 
coaaand  QUIT.  You  are  still  in  Cray  context  and  can  enter  any  Station 
coaaend.  It  is  recoaaended  that  you  use  the  STATUS  coaaand  to  be  sure 
your  interactive  session  terminated.  If  it  didn't,  enter  "RILL  jsq". 

To  leave  the  Station,  enter  EXIT  (or  AZ) .  This  will  bring  you  out 
of  Cray  context  and  back  to  the  VMS  proapt. 
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*  VMS  Cray  Station  Commands  * 

See  Appendix  C  for  the  syntax  of  these  comawnds. 

$  Create  a  temporary  VMS  subprocess,  allowing  you  to  enter 

DCL  commands.  To  return  to  Cray  context,  type  LOGOUT. 

+  Display  the  next  page  of  information  in  Cray  context. 

Display  the  previous  page  of  information  in  Cray  context. 

9  Execute  an  indirect  station  command  file  (containing 

station  commands)  in  Cray  context.  (Synonym  for  PLAY.) 

AZ  CTRL-Z  exit  the  current  processing  mode.  In  response  to 

the  Cray  context  prompt  (CRAY») ,  it  returns  you  to  DCL; 
during  a  Cray  interactive  session,  it  returns  you  to 
cosnsand  mode.  While  you  are  being  prompted  for  command 
parameters,  CTRL-Z  cancels  the  command.  You  can  also 
terminate  the  execution  of  an  indirect  station  command 
file  with  CTRL-Z. 

ABORT  Interrupt  the  current  interactive  Cray  job  step  and  return 

to  the  "1"  prompt  after  first  displaying  any  COS  output 
queued  for  the  terminal. 

ATTACH  Redirect  COS  interactive  terminal  output  to  an  alternate 

device. 

ATTENTION  Interrupt  the  current  interactive  Cray  job  step  and  enters 
reprieve  processing.  If  no  reprieve  processing,  ATTENTION 
is  the  same  as  ABORT. 

BYE  Terminate  an  interactive  session.  Depending  on  the 

command  qualifiers,  the  COS  interactive  job  may  also  be 
terminated. 

Cl NT  Enter  a  subset  of  Cray  context  that  incorporates  only  the 

INTERACTIVE  command  and  its  associated  subconands.  No 
other  Cray  context  comawnds  arc  available  during  a  CINT 
session.  CINT  is  designed  to  give  better  interactive 
performance,  since  it  invokes  only  a  subset  of  the  Cray 
context  image.  CINT  is  available  at  DCL  level.  Use 
INTERACTIVE  (in  Cray  context)  for  the  full  set  of  Cray 
context  commands. 

CLEAR  Terminate  any  display  command  and  clear  the  display 

portion  of  the  screen. 

COLLECT  Store  COS  interactive  output  in  a  VMS  file. 

COMMENT  Insert  comments  into  an  indirect  station  command  file 

stream. 

Eater  the  Cray  context  utility  or  execute  a  single  station 
command  when  that  command  is  supplied  as  a  parameter.  If 
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DATASET 

DELAY 

DISCARD 

DROP 

EOF 

EXIT 

HELP 

INTERACTIVE 

ISTATUS 

JOB 

JSTAT 

KILL 

LOGFILE 

LOOP 

MESSAGE 

PAUSE 

PLAY 

QUIT 


a  command  parameter  it  not  included  after  the  CRAY 
command,  you  remain  in  Cray  context  until  you  enter  the 
EXIT  command. 

Report  the  existence  of  a  COS  permanent  dataset. 

Suspend  execution  of  an  indirect  station  command  file  for 
a  specified  period  of  time. 

Discard  all  output  from  a  COS  interactive  session  until 
the  next  COS  prompt  is  issued. 

Terminate  a  COS  job  and  returns  the  associated  output 
dataset.  COS  job  execution  enters  reprieve  processing 
after  the  next  COS  EXIT  control  statement. 

Send  an  end-of-file  record  to  a  connected  COS  interactive 
job.  This  command  is  normally  required  to  terminate  COS 
file  input  from  the  terminal. 

Return  you  from  Cray  context  command  mode  to  DCL  command 
state.  If  you  issued  a  RECORD  command  during  the  session 
and  the  specified  file  is  still  open,  the  file  is  closed. 

Display  information  from  the  station  help  files  or  an 
index  of  all  commands. 

Initiate  or  restart  an  interactive  session. 

Return  the  status  of  your  COS  interactive  job,  including 
the  CPU  time  used  and  the  last  COS  logfile  message. 

Display  the  status  of  a  specific  COS  job. 

Display  the  status  of  a  specific  job  and  its  related 

tasks. 

Terminate  a  job  immediately. 

Provide  access  to  the  station  logfile  messages. 

Raatart  execution  of  an  indirect  station  command  file  at 
the  beginning  of  the  file.  End  looping  with  Z. 

Send  a  message  to  the  COS  job  and  station  logfiles. 

Suspend  the  execution  of  an  indirect  station  command  file. 
Control  is  passed  to  the  terminal,  where  you  can  terminate 
the  command  file  by  entering  a  command  or  resume  it  by 
entering  a  null  line  (<RET>). 

Execute  an  indirect  station  command  file.  (Same  as  8.) 

Terminate  a  Cray  interactive  session  and  the  corresponding 
COS  interactive  job.  (Equivalent  to  BYE/ABORT.) 
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RECORD 

RELEASE 

REMOVE 

RERUN 

SAVE 

SET 

SHOW 

SNAP 

STATCLASS 

STATUS 

STORAGE 

SUBMIT 


SNITCH 


Start  or  atop  the  recording  of  terminal  input  to  the 
specified  file  while  in  Cray  context  for  later  use  with 
the  PLAY  or  €  commands.  Exiting  Cray  context  automatically 
issues  a  RECORD/OFF. 

Release  a  dataset  that  is  held  by  COS. 

Delete  entries  in  the  dataset  staging  queue. 

Immediately  end  the  processing  of  a  COS  job  and  put  job 
back  into  the  input  queue,  unless  the  job  has  terminates 
or  cannot  be  rerun. 

Stage  a  VMS  file  to  COS  permanent  file. 

Define  terminal  working  environment  for  the  current 

session. 

Display  information  about  the  status  of  the  station 
staging  queue. 

Copy  the  current  contents  of  the  display  region  into  the 
specified  VMS  file.  If  the  comamnd  is  issued  from  a 
terminal  in  line-by-line  mode,  the  last  display  requested 
is  recorded  in  the  file. 

Display  the  current  COS  job  class  structure. 

Display  the  COS  system  status. 

Initiate  a  COS  mass  storage  status  display  providing  the 
following  information:  device  class  or  status;  device 
name  as  it  is  known  to  COS;  percentage  of  free  space  and 
perswnent  space  on  each  device;  number  of  recovered  and 
unrecovered  errors  on  each  device;  location  of  last  error. 

Stage  the  specified  VMS  file  to  COS  to  be  put  on  the  job 
input  queue.  The  file  must  contain  COS  JCL  (see  HELP 
#C0S) .  The  first  record  must  be  the  JOB  control 
statement.  By  default,  the  output  from  the  COS  job  (known 
as  a  logfile)  is  sent  to  the  directory  from  which  the  job 
was  submitted. 

Set  or  clear  COS  job  sense  switches. 
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*  Examples  * 


1)  $  cray 

CRAY>  interactive 
CRAY  JOBNAME:  abcdOOl 
CRAY  USERNAME :ABCD 
!  ACCOUNT , AC- 1222233344 , UPW-mypw . 


J<your  Cray  coaaands> 

!AZ 

CRAY>  <S tat  ion  commands* 
CRAY>  quit 
CRAY>  status 

(  CRAY>  kill  <jsq> 

CRAY>  <Station  commands* 
CRAY>  exit 


< —  any  jobnaae 
< —  user  ABCD 

< —  US-abcd  not  needed  since 
upper  case  was  used  in 
entry  above 

< —  ctrl-Z  to  leave  Cray 

< —  terminate  Cray  session 
< —  be  sure  your  session 
terminated 

< —  if  STATUS  show  your  session 
is  still  active  ) 

< —  leave  Cray  Station 


2)  $  cray  interactive 

CRAY  JOBNAME:  struct  < —  any  jobnaae 

CRAY  USERNAME :efgh  <—  user  EFGH 

1 ACCOUNT , AC- 1 222233344 , UPW-aypw , US- e f gh .  <--  US-efgh  needed 

since  lower  case 
was  used  in  entry 
above 

<saae  as  example  1> 


3)  $  cray  interactive  /jn-struct  /us-efgh  < —  any  jobnaae; 

user  EFGH 
(since  this  is  a 
VMS  DCL  co am and, 
it  is  converted  to 
upper  case) 

1ACC0UNT, AC-1222233344, UPW-aypw.  <—  US-efgh  not  needed 

since  the  VMS 
control  stateaent 
is  converted  to 
upper  case 


<saae  as  exaaple  1> 
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**  From  the  CDC  CYBER  860A  ** 

The  Cray  X-MP  it  acceieed  via  the  NOS  Interactive  Cray  Facility 
(ICF) ,  which  aay  be  entered  by  the  APPSW.ICF  command  from  IAF.  You 
enter  ICF,  log  onto  the  Cray,  do  your  thing  (Cray  or  ICF  commands) , 
leave  the  Cray  and  ICF.  You  will  then  be  at  the  NOS  prompt. 

Alternatively,  you  can  specify  ICF  as  the  application  when  you  log 
into  NOS. 

ICF  commands  have  a  prefix  (normally  a  slash  "/")  and  can  be 
intermixed  with  Cray  commands.  To  terminate  the  Cray  session  (and 
ICF),  enter  /BYE  or  /LOGOFF. 


*  NOS  ICF  User  Commands  * 

/ABORT  Send  abort  interrupt  to  the  interactive  Cray  job  (also 

user-break-2  key  (normally  Z2) . 

/ATTENTION  Send  attention  interrupt  to  the  interactive  Cray  job  (also 
user-break-1  key  (normally  Zl). 

/BYE  Terminate  this  Cray  interactive  session.  (Same  as 

/LOGOFF) 


/CONNECT 

/DISCARD 

/ENDCONNECT 

/ENDPLAY 

/EOF 

/HELP 

/ICFSTATUS 


Create  a  logical  connection  between  this  terminal  and  some 
other  (slave)  terminal. 

Discard  output  being  sent  from  the  Cray  to  this  terminal. 
Terminate  a  CONNECT. 

Terminate  reading  of  a  PLAY  file. 

Send  an  end-of-file  to  the  Cray. 

Display  help  information. 

Display  general  information  about  the  current  status  of 
ICF. 


/LOGOFF 

/LOGON 

/PERIOD 

/PLAY 

/PREFIX 

/QUIT 


Terminate  this  Cray  interactive  ttttioa.  (Same  as  /BYE) 

Initiate  or  reconnect  to  an  existing  Cruy  job. 

Set/reset  automatic  generation  of  a  terminator  on  COS 
commands. 

Read  data  and  commands  froa  a  NOS  file  in  the  user's 
catalog. 

Change  the  ICF  command  prefix  letter. 

Immediately  terminate  this  Cray  interactive  session. 
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/RESUME 

/SUSPEND 

/STATUS 

/* 


Reauae  the  transaission  of  data  to  and  froa  the  Cray 
(negate  the  effect  of  SUSPEND) . 

Suspend  tranaaiaaion  of  data  to  and  froa  the  Cray. 
Diaplay  Cray  atatua. 

An  ICF  coaaent  line. 


*  Exaaplea 


1)  /appaw.icf 
<a  greet ing> 

/logon  af-acr 

<a  greeting> 

1  account , «■ 1 222233344 , upw-aypw . 
l<your  Cray  or  ICF  coaaanda> 
1/bye 


2)  FAMILY:  ,abcd,pw,icf 
<a  greet ing> 

/logon  af-acr 

<a  greeting* 

1  account ,  ac-  1222233344 ,  upw-aypw . 
l<your  Cray  or  ICF  coaaanda* 
1/bye 

T1210  -  APPLICATION:  iaf 


< —  /  is  the  NOS  proapt 

< —  /  is  required; 

log  onto  DTRC  Cray 

< —  US-abcd  not  needed 

< —  to  leave  Cray  and  ICF 

< —  log  into  ICF  directly 

< —  /is  required; 

log  onto  DTRC  Cray 

< —  US-abcd  not  needed 

< —  to  leave  Cray  and  ICF 
< —  switch  to  another 

application  such  as  IAF 
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*****  Cray  JCL  Commands  ***** 

The  Cray  Job  Control  Language  (JCL)  atateaents  are  grouped  by 
function  in  thia  aection.  See  Appendix  B  for  a  deacription  of  the 
ayntax  for  each  coaaand.  (DTRC)  indicates  a  coaaand  or  prograa  added 
at  DTRC.  Soae  of  the  logic  atructure  coaaanda  uae  JCL  expressions, 
which  are  deacribed  later  in  thia  aection. 


***  Job  Definition  and  Control  *** 


* 

ACCOUNT 

ALTACN 

CALL 

CHARGES 

ECHO 

EXIT 

IOAREA 

JOB 

JOBCOST 

LIBRARY 

MEMORY 

MODE 

NORERUN 

OPTION 

RERUN 

RETURN 

ROLLJOB 

SET 

SNITCH 


Entire  line  ia  a  coaaent. 

Validate  a  uaer'a  Job  Order  Number,  uaer  naae  and  paaaword. 
Validate  an  alternate  account  number  for  permanent  dataaeta. 
Read  control  atatementa  from  another  file. 

Report  on  job  reaourcea. 

Control  logfile  measagea. 

On  job  abort,  proceaaing  continuea  with  the  atatement 
following  the  EXIT;  if  no  abort,  terminate  job  proceaaing. 

Control  acceaa  to  a  job' a  I/O  area  (containing  the  DSP  and  I/O 
buffers) . 

First  atatement  of  a  job  —  gives  job  parameters. 

(DTRC)  Write  a  summary  of  job  coat  and  system  usage  to  $L0G. 
Specify  search  order  for  procedures  during  processing. 

Request  new  field  length. 

Set/clear  mode  flags. 

Control  a  job's  rerunability. 

Specify  user-defined  options. 

Control  a  job's  rerunability. 

Return  from  an  alternate  control  statement  file. 

Protect  a  job  by  writing  it  to  disk. 

Change  value  of  a  JCL  symbolic  variable. 

Turn  pseudo  sense  switches  on  or  off. 
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ACCESS 

ASSIGN 

HOLD 

NOHOLD 

RELEASE 

ACCESS 

ADJUST 

DELETE 

MODIFY 

NEWCHRG 

PERMIT 

SAVE 

SCUUBDS 

See 

ACQUIRE 

DISPOSE 

FETCH 

MSACCES 

MS FETCH 
MSPURGE 
MSSTORE 


***  Dataset  Definition  and  Control  *** 

Make  a  permanent  dataset  local. 

Create  a  dataset  and  assign  dataset  characteristics. 

Dataset  release  occurs  with  implicit  HOLD. 

Cancel  effect  of  HOLD. 

Relinquish  access  to  a  dataset  from  a  job. 

***  Permanent  Dataset  Management  *** 

Make  a  permanent  dataset  local. 

Redefine  size  of  a  permanent  dataset. 

Remove  a  permanent  dataset. 

Change  a  permanent  dataset's  characteristic  information. 
(DTRC)  Change  permanent  file  account  number. 

Grant/deny  access  to  a  permanent  dataset. 

Make  a  dataset  permanent. 

Write  over  a  dataset  before  release. 

***  Permanent  Dataset  Staging  *** 

Chapter  3  for  staging  to  and  from  the  Mass  Storage  System. 

Get  a  front-end  dataset  and  make  it  permanent. 

Stage  dataset  to  the  front-end;  release  a  local  dataset; 
change  disposition  characteristics. 

Get  a  front-end  dataset  and  make  it  local. 

(DTRC)  Supply  your  Username  and  password  to  the  Mass  Storage 
System  (MSS) . 

(DTRC)  Fetch  a  file  from  the  MSS. 

(DTRC)  Purge  a  file  from  the  MSS. 

(DTRC)  Store  a  file  on  the  MSS. 


SUBMIT 


Send  local  dataset  to  COS  input  queue 
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***  Permanent  Dataset  Utilities  *** 

AUDIT  Report  on  permanent  datasets. 

***  Local  Dataset  Utilities  *** 

BLOCK  Convert  an  unblocked  dataset  to  a  blocked  dataset. 

COPYD  Copy  blocked  datasets. 

COPYF  Copy  blocked  Piles. 

COPYR  Copy  blocked  records. 

COPYU  Copy  unblocked  datasets. 

DS  List  local  datasets. 

NOTE  Write  text  to  a  dataset. 

QUERY  Determine  the  current  status  and  position  of  a  local  file. 
REWIND  Position  a  dataset  at  its  beginning. 

SKIPD  Skip  blocked  datasets  (position  at  EOD  (after  last  EOF)). 

SKIPF  Skip  blocked  files  from  current  position. 

SKI PR  Skip  blocked  records  from  the  current  position. 

SKIPU  Skip  sectors  on  unblocked  datasets. 

UBBLOCK  Convert  a  blocked  dataset  to  an  unblocked  dataset. 

WRITEDS  Initialize  a  blocked  dataset  by  writing  a  single  file 

containing  a  specific  number  of  records  of  a  specific  length. 

***  Dumps  and  Other  Aids  *** 

COMPARE  Compare  two  datasets. 

DEBUG  Interpret  a  dump. 

DUMPJOB  Capture  job  inforsution  in  dataset  $DUMP  for  display  by  DUMP. 

DUMP  Display  job  infortsation  previously  captured  by  DUMPJOB. 

FLODUMP  Dump  flowtrace  table. 
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FTREF  Generate  Fortran  cross-reference. 

ITEMIZE  Report  statistics  about  a  library  dataset. 

PRINT  Write  value  of  JCL  expression  to  the  logfile. 

SPY  Generate  a  histogram  of  time  usage  within  a  program  to  locate 

inefficient  code. 

***  Logic  Structure  *** 

ELSE  IF-loop  control. 

ELSEIF  IF-loop  control. 

ENDIF  IF-loop  termination. 

ENDLOOP  LOOP  termination. 

EXITIF  IF-loop  control. 

EXITLOOP  LOOP  control. 

IF  Begin  a  conditional  block  of  code. 

LOOP  Start  of  an  iterative  control  statement  block. 

***  Procedures  *** 

See  Section  2-3  for  additional  information  on  the  creation  of 
procedures. 

CALL  Transfer  control  to  a  procedure. 

"call  by  name" 

Execute  a  complex  procedure  in  a  library. 

ENDPROC  End  of  a  procedure. 

PROC  Begin  an  in-line  procedure  definition  block.  This  is  followed 
by  the  procedure  prototype  statement  which  names  the  procedure 
and  gives  the  formal  parameter  specifications. 

RETURN  Return  control  from  a  procedure  to  its  CALLer. 

***  Programming  Languages  *** 

CFT  Compile  a  Fortran  source  program. 

CFT77  Alternate  Fortran  compiler  (slower  compile,  faster  execute). 
PASCAL  Compile  a  Pascal  source  program. 
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***  Program  Libraries  *** 

See  Section  2-4  for  a  discussion  of  prograa  libraries  (PL). 
AUDPL  Audit  an  UPDATE  PL. 

UPDATE  Source  and  data  maintenance. 

***  Object  Libraries  *** 

See  Section  2-5  for  a  discussion  of  object  libraries. 

BUILD  Generate  and  aaintain  library  datasets. 

SEGLDR  Segment  loader  (see  Section  2-6). 

***  Miscellaneous  *** 

"call  by  name" 

Execute  a  program  by  its  local  file  name. 

SID  Debug  programs  interactively  or  in  batch. 

SORT  Sort/merge. 
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***  JCL  Expressions  *** 

An  expression  is  a  string  of  operands  and  operators.  It  is 
evaluated  froa  left  to  right,  taking  into  account  parentheses  and 
operator  hierarchy.  Expressions  allow  the  increaenting  of  counters, 
error  cod*  checking,  and  string  comparison. 

There  are  four  types  of  operands: 

.  integer  constants  (+ddd. . .  or  -ddd. ..  -  decimal 

nnn...B  -  octal 

range:  0  to  ~10**19) 

.  literal  constants  ('ecc...'L  -  left-justified,  zero-filled 

' ecc...'R  -  right-justified,  zero-filled 
'ccc...'H  -  left-justified,  blank-filled 
range  of  c:  040  -  176  octal 
default:  H) 

.  symbolic  variables  (see  below) 

.  subexpressions  (its  value  becomes  an  operand) 

Expressions  aay  be  used  in  IP,  ELSEIF,  EXITIF,  and  EXITLOOP. 


**  Symbolic  Variables  ** 

There  are  38  symbolic  variables:  6  system  constants,  7  variables 
set  by  COS,  and  25  which  can  be  set  by  the  user. 


*  System  Constants  * 


Symbol 

Rang* 

Description 

FALSE 

0 

False 

SID 

literal 

Mainframe  ID  (Cl) 

STSID 

literal 

COS  level  ('COS  n.nn') 

TRUE 

-1 

True 

SN  and  XM  are  also  available. 


*  COS-set  Variables  * 


Symbol 

Range 

Description 

ABTCODE 

0-nnn 

COS  job  abort  cod*  (ABnnn) 

DATE 

literal 

mm/dd/yy 

FL 

0-77777777 

current  octal  field  length 

FLM 

0-77777777 

JOB  statement  maximum  octal  FL 

PDMST 

64-bits 

status  of  most  recent  Permanent 
Dataset  Manager  request 

TIME 

literal 

hh:am:ss 

TIHELEFT 

64-bit  integer 

job  time  remaining  (milliseconds) 
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*  Ueer-aet  Variables  * 


Symbol 

Range 

Description 

G0-G7 

64-bits 

8  global  pseudo-registers 

(can  be  used  to  pass  data  between 

procedures) 

J0-J7 

64-bits 

8  job  (local)  pseudo-registers  (each 
procedure  level  has  its  own  J  registers) 

JSR 

64-bits 

Job  Status  Register  containing  the 
previous  job  step  completion  code 

NOTEXT 

64-bits 

text  field  not  echoed 
(default:  ON) 

PDMFC 

64-bits 

most  recent  user-issued  PDK  request 

SSW1-SSW6 

64-bits 

pseudo  sense  switches 

**  Operators  ** 

Operators  may  be 

.  arithmetic  (+,  -,  *,  /) ;  Underflow  and  overflow  are  not  detected; 
division  by  0  produces  zero 

♦  relational  ( • EQ • ,  . NE ■ ,  «LT« (  ■ GT • t  » LE • i  . GE >) ;  re t urns  —1 
(TRUE)  or  0  (FALSE) 

.  logical  (.OR.,  .AND.,  .XOR.,  .NOT.);  returns  a  64-bit  value 

Operations  are  performed  left  to  right,  taking  into  account 
parentheses,  with  the  hierarchy  of  operators:  (*,  /) ,  (+,  -) , 
relational,  .NOT.,  .AND.,  .OR.,  .XOR.. 


**  Strings  ** 

A  string  is  a  group  of  ASCII  characters  (040-176  octal)  to  be  taken 
literally.  There  are  two  types  of  strings: 

.  literal  -  delimited  by  apostrophes  — 

.  parenthetical  -  delimited  by  parentheses  —  (...) 

Literal  strings  do  not  include  the  delimiters.  An  apostrophe  within 
a  literal  string  is  represented  by  two  apostrophes:  .  A  null 

string  is  indicated  by  two  apostrophes:  ’’.A  literal  string  is 
continued  by  placing  an  apostrophe  and  a  continuation  character  at  the 
end  of  the  first  line  and  an  apostrophe  at  the  start  of  the  string  on 
the  next  line: 

...'This  Is  A  '* 

'Long  String.'  becomes  This  Is  A  Long  String. 
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Parenthetical  etrings  do  not  include  the  delimiters.  Spaces  are 
removed;  nested  parentheses  are  not  treated  as  separators;  literal 
strings  may  appear  in  a  parenthetical  string.  A  parenthetical  string 
is  continued  by  placing  a  continuation  character  at  the  end  of  the 
first  line  and  continuing  the  string  on  the  next  line: 

... (This  Is  A  A 

Long  String.)  becomes  ThisIsALongString. 


i 


t 
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*****  Procedure*  ***** 

A  procedure  ia  a  group  of  control  stateaents  separate  from  the  job 
control  atateaent  dataset  ($CS) .  Calling  a  procedure  provides  a 
simplified  way  to  process  that  group  of  control  stateaents.  A  procedure 
aay  be  called  by  a  job  repeatedly  or  by  another  procedure. 

There  are  two  kinds  of  procedures  in  COS: 

.  siaple  -  a  sequence  of  control  stateaents 

.  eoaplex  -  a  prototype  atateaent  (giving  the  naae  of  the  procedure 
and  any  parameters),  the  control  stateaents,  and 
optional  data. 


***  Siaple  Procedures  *** 

A  siaple  procedure  has  no  naae  or  paraaeters  and  resides  in  a  non¬ 
library  dataset.  It  is  invoked  by  a  CALL  without  the  CNS  parameter. 
Control  is  returned  to  the  caller  by  a  RETURN  atateaent,  the  end  of  the 
first  file  in  the  dataset,  or  an  EXIT  (when  not  skipping  because  of  an 
error  condition).  A  siaple  procedure  has  no  parameter  substitution. 

Any  COS  JCL  stateaent,  except  PROC  and  ENDPROC,  aay  be  used  in  a 
siaple  procedure.  One  use  aight  be  to  access  all  the  datasets  needed 
in  several  jobs  without  having  to  specify  then  in  the  individual  jobs. 


***  Coaplex  Procedures  *** 

Complex  procedures  are  naaed  and  aay  have  paraaeters  described  in  a 
prototype  stateaent.  Coaplex  procedures  are  executed  by 

.  "call  by  naae",  which  aay  include  paraaeters  for  substitution  in 
the  procedure.  The  procedure  is  in  $PR0C  or  a  local  dataset 
naaed  in  a  LIBRARY  stateaent. 

.  CALL, DN-pr ocf yl , CNS,  followed  by  a  line  containing  the  procedure 
naae  and  paraaeters  for  substitution.  The  procedure  is  the  first 
file  in  a  separate  dataset;  PROC  and  ENDPROC  are  not  used. 

Coaplex  procedures  aay  appear,  deliaited  by  PROC  and  ENDPROC,  in 
the  job  control  stateaent  dataset  ($CS) .  When  PROC  is  encountered,  the 
procedure  is  written  to  SPROC.  Subsequent  calls  to  the  procedure  aay 
then  be  aade  using  the  procedure  naae  (and  any  substitute  paraaeters). 
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A  complex  procedure  hes  the  general  for®: 

PROC.  < —  not  for  CALL 

prototype  atateaent 
control  statement! 

•  e  • 

&DATA, dnl . 

data  for  first  dataset 

e  e  e 

&OATA , dnn . 

data  for  last  dataset 

ENDPROC.  <—  not  for  CALL 


**  Prototype  Statement  ** 

The  prototype  statement  defines  the  name  of  the  procedure  and  its 
formal  parameters  with  their  default  value(s).  It  has  the  form: 

name,pl,p2, . . . ,pn. 

name  -  the  name  of  the  procedure  (1—8  alphanumeric  characters) 

pi  -  a  formal  parameter  specification 

posi  -  positional 

keyi*dval:kval  -  keyword 

keyi  -  formal  keyword  name 

dval  -  optional  default  value  when  keyi  is 
omitted  from  the  calling  statement 
kval  -  optional  default  value  when  keyi  is 
specified  in  the  calling  statement 
without  a  value 

keyi*  -  no  defaults;  the  caller  must  supply  a  non-null 

value 

keyi*:  -  no  defaults;  allows  keyi  and  keyi* 


**  Temporary  Datasets  ** 

One  or  more  temporary  datasets  may  he  included  in  a  complex 
procedure  following  the  control  statement.  Each  starts  with 

&DATAtdn. 

where  dn  is  the  required  dataset  name. 
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**  Parameter  Substitution  ** 

Formal  parameters  are  used,  preceded  by  an  aaq>ersand  (&) ,  within 
the  body  of  the  procedure.  On  execution,  each  is  replaced  by  the  value 
supplied  or  implied  in  the  calling  statement.  &param  is  delimited  by 
any  character  except  A-Z,  a~z,  0-9,  8,  $,  or  X.  If  the  next  character 
is  one  of  these,  the  underline  (_)  is  used  as  the  delimiter  and  is 
removed  at  execution  time. 

If  too  few  positional  parameters  are  specified  by  the  caller,  null 
strings  are  used  for  the  remaining  parameters;  if  too  many,  the  job 
aborts.  Keyword  parameters  may  appear  in  any  order,  however,  all 
positional  parameters  must  precede  all  keywords. 


**  Apostrophes  and  Parentheses  ** 

Apostrophes  in  the  calling  statement  denote  literals  and  are  not 
removed  during  substitutions;  the  outer  set  of  parentheses  are  removed. 
If  you  are  not  sure  how  a  parameter  is  used  in  the  procedure,  enclose 
it  in  parentheses. 

The  following  shows  parenthetical  substitution: 


caller  after  substitution 


value 

(valuel-value2) 
valuel'. 'value2 
valuel (.)value2 


value 

valuel-value2 
valuel ' . 'value2 
valuel. value2 


***  DTRC  Procedure  Library  *** 

One  procedure  library  has  been  added  to  COS  at  DTRC: 

PROCLIB , OWN-PUBLIC. 

To  use:  ACCESS, PROCLIB, OWN-PUBLIC. 

LIBRARY, PROCLIB:*. 
procname ..... 
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***  Examples  *** 

**  Simple  Procedures  ** 

1)  The  first  file  of  dataset  GETLIBS  contains: 

ACCESS , DN-MSPROC , OWN-PUBLIC .  <—  the  MSS  procedures 

ACCESS, DN-DTLIB, OWN-PUBLIC.  <—  the  DTLIB  subroutine  library 
ACCESS , DN-SUBS .  < —  your  subroutine  library 

This  is  executed  by: 

CALL, DN-get libs. 


**  Complex  Procedures  ** 

2)  As  in  example  1,  but  your  subroutine  library  is  to  be  identified  by 
the  caller: 

GETLIBS, SUBS. 

ACCESS , DN-MSPROC , OWN-PUBLIC . 

ACCESS , DN-DTLIB , OWN-PUBLIC . 

ACCESS , DN-SUBS , PDN-&SUBS . 

When  called  by: 

CALL.DN-getlibs.CNS. 
get libs, othersubs . 

the  third  ACCESS  expands  to  ACCESS, DN-SUBS, PDN-othersubs.  Note  that 
the  name  of  the  procedure  is  unimportant,  since  it  is  the  only 
procedure  in  the  file,  "getlibs, othersubs."  could  be  replaced  by 
othersubs". 

When  called  by: 

CALL.DN-getlibs.CNS. 
getlibs, (hislib,OWN-hia) . 

the  third  ACCESS  expands  to  ACCESS , DN-SUBS , PDN-hi s lib, OWN-bim. 

When  called  by: 

CALL, DN-get 1 ibs , CNS . 
getlibs, 'hislib.OWN-him' . 

the  third  ACCESS  expands  to  ACCESS, DN-SUBS, PDN-'hislib, OWN-him' . 
While  this  is  legal  (it  says  the  permanent  filename  is 
"hislib, OWN-him") ,  it  is  probably  an  error  and,  if  so,  will  abort 
the  procedure. 


< —  prototype  statement 
< —  the  MSS  procedures 
< —  the  DTLIB  subroutine  library 
< —  your  subroutine  library 


> 


1 
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3)  Create  a  procedure  library  from  procedures  in  the  job  stream. 


•  •  • 

ECHO, OFF. 

RELEASE,  DN-$PROC.  <— 

* 

PROC.  <— 

prototype 

procedure  body 

RETURN. . .procname 

EXIT. 

RETURN, ABORT. . .procname 
ENDPROC.  <— 

* 

PROC.  <— 

prototype 

procedure  body 

RETURN. . .procname 

EXIT. 

RETURN, ABORT. . .procname 
ENDPROC.  «— 

* 

...  <— 

* 

ACCESS, DN-proclib,NA,UQ.  <-- 

SAVE, DN-$PROC,PDN-proc lib.  <-- 


DELETE,  DN-proclib,NA.  <— 

RELEASE,  DN-SPROC.  <— 

ACCESS, DN-proclib.  <-- 

LIBRARY, DN«*:proclib.  <— 

-or- 

LIBRARY,  DN-proclib:*  <— 


ECHO, ON. 


return  existing  $PR0C 

write  £irst  procedure  to  $PROC 


end  of  first  procedure 
write  next  procedure  to  $PROC 


get  original  (existing)  library 

save  new  library 

delete  original  library 

return  new  library 

get  new  library  with  its  own  name 

add  it  to  the  end  of  the  library 

list 

add  it  to  the  beginning  of  the 
library  list 


end  of  procedure 
more  procedures 


<  use  one  of  the  procedures 


> 
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Create  a  procedure  library  fro*  procedures 

e  •  • 

FETCH, DN-ayprocs, TEXT- 'ayprocs. pro* . 

CALL , DN-ayprocs . 

SAVE , DN-$PR0C , PDN-pr oc lib, PAM-R . 

where  VMS  file  MYPROCS.PRO  contain*: 

*  first  procedure 
PROC. 
prototype 
procedure  body 
ENDPROC. 

*  next  procedure 
PROC. 
prototype 
procedure  body 
ENDPROC. 

*  next  procedure 

•••  < —  aore  procedures 


in  a  separate  file. 

<—  defaults  to  AC-ST 
K —  others  aay  use  it 
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*****  Program  Librari®*  ***** 

Sourc®  program*  and  data  may  b®  in  *®parat®  datas®t*  or  may  be 
stored  and  maintained  in  program  libraries.  UPDATE  create*  and 
maintain*  these  libraries  while  AUDPL  (see  Appendix  B)  audits  them. 


***  UPDATE  *** 

UPDATE  is  a  program  for  creating  and  modifying  a  program  library 
(PL).  In  addition,  UPDATE  will  extract  individual  nodules  for  input  to 
a  compiler  or  other  program. 

By  default,  72  columns  of  information  are  retained.  Fifteen 
additional  characters  are  retained  for  each  line:  an  8-character 
identifier,  a  period  (.),  and  a  6-digit  sequence  number,  i.e.,  id.seq. 

UPDATE  supports  two  kinds  of  text  modules  or  decks: 

-  a  regular  deck  (beginning  with  a  DECK  directive) 

-  a  common  deck  (beginning  with  a  COMDECK  directive)  which  may  be 
included  in  decks  with  a  CALL  directive 

Each  type  includes  all  lines  following  the  deck  directive  until  the 
next  deck  or  modification  directive. 

History  information  is  retained  allowing  the  deletion, 
modification,  or  restoration  or  previous  modifications. 

See  Appendix  B  for  a  description  of  the  UPDATE  control  statement 
parameters. 


***  UPDATE  Directives  *** 

An  UPDATE  directive,  which  must  be  in  upper  ease,  has  the  following 
format: 


m  direct ive_name  [  parameters  ] 

where  m  is  the  master  character  (default:  asterisk  (*)).  There  are 
five  categories  of  directives. 

**  DECK  and  COMDECK  ** 


*DECK  deck  (*DR) 

First  line  of  a  new  deck.  <deek>  is  up  to  8  characters, 
any  ASCII  character  from  41  to  176  octal,  except  eona, 
period,  blank,  colon,  equals. 

*C0MD£CK  cmdk  (*CDK) 

First  line  of  a  new  common  deck. 
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**  Compile  Directives  ** 

♦CALL  cmdk  (*CA) 

Include  the  contents  of  a  common  deck. 

*CWEOF 

Write  an  EOF  on  the  compile  dataset  if  anything  was 
written  since  the  last  EOF. 

*NOSEQ 

Do  not  write  sequence  numbers. 

*SEQ 

Write  sequence  numbers. 

*WEOF 

Write  an  EOF  on  the  compile  dataset. 

♦WIDTH  dw 

Change  the  data  width  (default:  72). 

*IF,  ♦ELSEIF,  ♦ELSE,  and  *ENDIF  are  also  available. 


*♦  Modification  Directives  ♦♦ 

♦BEFORE  id.seq  (*B) 

Insert  before  a  line. 

♦COPY  p,idl.oeql,id2.seq2  (*CY) 

Copy  a  range  of  lines  from  deck  or  comdeck  <p>. 

♦DELETE  idl.seql  (*D)  <—  one  line 

♦DELETE  idl.seql, id2.seq2  < —  a  range  of  lines 

♦DELETE  idl.seql, .seq2  < —  same  (short  form) 

Delete  a  line  or  a  range  of  lines. 

♦IDENT  ident  (*ID) 

♦iDENT  ident ,K~kl:k2: . . . ,U“ul:u2: . . . 

Identify  a  set  of  modifications.  You  can  require  that 
other  modification  sets  be  known  (K“)  or  unknown  (U-) . 

♦INSERT  id.seq  (*I) 

Insert  after  a  line. 


♦RESTORE  idl.seql 

(*R) 

< —  one  line 

♦RESTORE  idl.seql, id2.seq2 

< —  a  range  of  lines 

♦RESTORE  idl.seql, .seq2 

< —  same  (short  form) 

Restore  a  line  or  a  range  of  lines. 
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** 


Run  Options 


** 


*/ comment 

A  comment  line. 

♦COMPILE  pl,p2, . . . ,pj .pk, . . . ,pn  (*C) 

Write  one  or  more  decks,  including  a  range  (pj.pk),  to  the 
compile  and/or  source  datasets.  Use  UPDATE, R  to  force  the 
output  order. 

*COPY  p, idl . seql , id2. seq2, dn  (*CY) 

♦COPY  p, idl. seql, id2.seq2,dn,SEQ 

Copy  a  range  of  lines  from  deck  or  comdeck  <p>  to  dataset 
<dn>.  SEQ  will  include  sequence  numbers. 

*LIST 

Resume  listing  input  lines.  UPDATE, L^O  overrides  *LIST. 

*MASTER  m 

Define  a  new  master  character  for  subsequent  directives, 
(default:  *) 

*NOLIST 

Stop  listing  input  lines.  *N0LIST  overrides  UPDATE, IN. 

*READ  dn  (*RD) 

Read  input  from  another  dataset. 

♦REWIND  dn 

Rewind  a  dataset. 

*SKIPF  dn 
*SKIPF  dn.n 

Skip  file(s)  in  a  local  dataset. 

♦DECLARE  and  ♦DEFINE  are  also  available. 
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**  Input  Edit  Directives  ** 

*EDIT  pl,p2,...,pn  (*ED) 

Reaove  deleted  and  yanked  lines  from  specific  decks. 

These  lines  cannot  be  retrieved.  This  is  useful  for 
cleaning  up  a  PL. 

*MOVEDK  dkl;dk2 
*M0VEDK  dkl: . 

Position  deck  of  common  deck  <dkl>  immediately  after  deck 
or  common  deck  <dk2>  or  at  the  beginning  of  the  PL  <•>. 

*PURGE  idl , id2, . . . , idj . idk . idn. . 

Remove  the  effect  of  a  modification  set  (idi) ,  a  range  of 
datasets  (idj. idk),  or  a  set  and  all  following  (idn..). 


*PURGEDK  dk 

Permanently  remove  a  deck  or  common  deck. 

*UNYANK  idl, id2,..., idj. idk . idn.. 

Reactivate  a  deck,  comdeck,  or  modification  set  previously 
yanked. 

*YANK  idl, id2, . . . , idj . idk, . . . , idn. . 

Temporarily  delete  a  deck,  comdeck,  or  modification  set 
previously  yanked. 

*SKIP  and  *ENDSKIP  are  also  available. 
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***  Examples  *** 


1)  Create  a  PL: 

JOB , JN-makepl 1 . 

ACCOUNT . 

UPDATE, P-0, C-0.  <--  no  $PL  or  $CPL 

SAVE , DN-SNFL , PDN-mypl . 

/EOF 

*DK  DECK1 

<line*  for  deck  DECKl> 

*DK  DECK2 

<linea  for  deck  DECK2> 

*1*  DECK3 

< lines  for  deck  DECK3> 


2)  Extract,  compile  and  execute  deck  DECK2  from  PL  MYPL: 

JOB, JN-getpl2. 

ACCOUNT,.... 

ACCESS , DN-SPL , PDN-myp 1 . 

UPDATE. 

CFT.I-SCPL. 

SEGLDR.CMD-' MAP, PART' ,GO. 

/EOF 

*C  DECK2 

3)  Create  a  PL  using  a  common  deck,  compile  and  execute: 

JOB , JN-makepl 3 . 

ACCOUNT,.... 

UPDATE, P-0.  < —  no  $PL  (required  to  create) 

SAVE, DN-SNPL, PDN-mypl . 

CFT.I-SCPL. 

SEGLDR , CMD- ' MAP , PART ' , GO . 

/EOF 

*CDK  COM3 

common  /  mycom  /a,  b,  c 
real  a,  b,  c 
*DK  PR0G3 

program  prog3 
♦CALL  COM3 

call  sub 

print  *,  'a,b,c«',  a,  b,  c 
end 

♦DECK  SUB 

subroutine  sub 
*CA  COM3 

a  -  1. 
b  -  2. 
c  -  3. 
return 
end 
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4)  Update  old  source  library  to  new,  conpile  all  decks  and  execute: 

JOB, JN*job4. 

ACCOUNT . 

ACCESS , DN-SPL , PDN-ny 1 i b . 

UPDATE, F,N. 

SAVE , DN-SNPL , PDN-ny 1 i b . 

CPT,I-$CPL. 

SEGLDR.GO. 

/EOF 

*IDENT  DS0620  < —  correction  aust  be  unique  (initials, date) 

^INSERT  ALONE. 57  < —  correct  deck  ALONE  by  insert  after  line  57 

<FORTRAN  statements* 

^DELETE  FOUR. 12, 13  < —  correct  deck  FOUR  replacing  lines  12-13 

<new  lines  to  replace  deletions  -  optional* 

/EOF 

<data  lines,  if  any* 

/EOF 

5)  Select  routines  from  source  subroutine  library  on  MSS  and  conpile 
with  own  progran: 

JOB , JN- j  ob5 . 

ACCOUNT,.... 

ACCESS , DN-HSPROC , OWN-PUBLIC . 

LIBRARY , DN-MSPROC: * . 

MSACCES , UN-un , MPW-ayms  s  pw . 

CFT.  < —  conpile  own  prograns 

MSFETCH , DN-LIBR , MDN-DTLIBPC , UN-NSYS . 

UPDATE, P-LIBR.Q.L-0. 

CFT,I-$CPL,L-0.  < —  onit  L-0  to  get  listing 

SEGLDR,GO.  < —  load  and  execute 

/EOF 

<own  FORTRAN  decks* 

/EOF 

*C  rtnl,rtn6.rtn8  < —  select  decks  RTN1,  6,  7,  8  from  library 

/EOF 

<data  records,  if  any* 

/EOF 
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*****  Object  Libraries  ***** 

BUILD  is  a  utility  for  creating  and  aaintaining  libraries  of 
absolute  and  relocatable  object  Modules.  These  libraries  can  then  be 
used  by  the  loader  to  locate  the  prograa  to  execute  or  the  subprograms 
to  be  loaded  with  your  prograa. 

The  BUILD  control  stateaent  and  BUILD  directives  are  described  in 
Appendix  B. 


***  DTRC  Object  Libraries  *** 

Two  object  libraries  have  been  added  to  COS  at  DTRC: 

DTLIB, OWN-PUBLIC  -  Subprograas  written  or  aaintained  by  the 

Coaputer  Center 

To  use:  ACCESS, DN-DTLIB, OWN-PUBLIC. 

SEGLDR  directive:  LIB-DTLIB 

UTILITY , CAW-PUBLIC  -  Prograas  written  or  maintained  by  the 

Coaputer  Center 

To  use:  ACCESS .DN-UTILITY, OWN-PUBLIC. 
LIBRARY.UTILITY:*. 
prograa_naae . 


***  Examples  *** 

1)  Create  a  library  of  subprograas: 

JOB, JN-JOB1 . 

ACCOUNT,... . 

CFT. 

BUILD, I-O.OBL-O. 

SAVE , DN-SNBL , PDN-MYSUBLIB . 

/EOF 

<Fortran  source  subprograas> 

/EOF 


2)  Create  a  library  of  all  subprograas  from  an  UPDATE  library: 


JOB, JN-JOB2. 

ACCOUNT . 

ACCESS , DN-SPL , PDN-MYPL . 
UPDATE, F. 

CFT.I-SCPL. 

BUILD, I-O.OBL-O. 

SAVE, DN-SNBL, PDN-MYSUBLIB . 
/EOF 
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3)  Add  a  aubprograa  to  an  existing  library  and  have  the  output  liat 
alphabetical  order. 

JOB.JN-JOB3. 

ACCOUNT,.... 

ACCESS , DN-SOBL , PDN-MYSUBLIB . 

CFT. 

BUILD, 1-0, SORT. 

SAVE , DN-SNBL, PDN-MYSUBLIB . 

/EOF 

<Fortran  aource  aubprograaa> 

/EOF 


4)  Delete  aubprograa  BADSUB  froa  an  exiating  library  and  liat  the 
contenta  of  both  old  and  new  librariea. 

JOB, JN-J0B4. 

ACCOUNT, .... 

ACCESS , DN-SOBL , PDN-MYSUBLIB . 

BUILD, B-0. 

SAVE , DN-SNBL , PDN-MYSUBLIB . 

/EOF 

OMIT  BADSUB 
LIST 


5)  Liat  the  contenta  of  an  exiating  library. 

JOB, JN- JOBS. 

ACCOUNT, .... 

ACCESS , DN-SUBLIB , PDN-MYSUBLIB . 

BUILD, OBL-0.NBL-0, B-0. 

/EOF 

FROM  SUBLIB;  LIST. 
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*****  Loader  ***** 

The  loader  is  responsible  for  loading  all  programs,  resolving  any 
external  references,  and  optionally  initiating  execution.  Loading  can 
produce  either  a  single  absolute  module,  or  a  (segmented)  absolute 
program  in  which  different  parts  of  a  program  reside  in  memory  only 
when  needed. 


***  SEGLDR  *** 

The  primary  loader  is  SEGLDR.  It  is  controlled  by  directives 
which  may  appear  as  the  next  file  in  the  input  stream,  in  a  separate 
file,  or  in  the  loader  control  statement. 


**  Control  Statement  ** 

See  Appendix  B  for  a  fuller  description  of  the  SEGLDR  control 

statement. 

SEGLDR, I~dirfile, L“1 is tf ile,DW-dirwidth,CMD“' directives ' ,G0. 
"SEGLDR."  implies  SEGLDR, I-$ IN, L-SOUT.DH-80. 


**  Message  Levels  ** 

SEGLDR  issues  messages  at  the  following  levels: 

ERROR  -  immediately  terminates  SEGLDR  with  no  executable 
output 

WARNING  -  no  executable  output  but  processing  continues 

CAUTION  -  executable  output  but  a  possible  error  was  found 

NOTE  -  SEGLDR  has  been  misused  or  used  ineffectively; 
executable  output  is  still  valid 


COMMENT  -  does  not  affect  execution 
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**  Directives  ** 

Most  SEGLDR  directives  have  the  format:  keyword-value.  Coaments 
(anything  following  an  asterisk  (*))  nay  appear  anywhere  in  the 
directives,  including  at  the  end  of  a  directive  line.  Multiple 
consents  on  a  line  are  separated  by  a  semicolon  (;).  Eleaents  of  a 
list  are  eoaaa-separated.  Directives  nay  be  continued  by  splitting 
the  line  after  a  parameter  (the  coma  is  the  last  non-blank  character 
in  the  line) . 

Naming  files:  ABS,  BIN,  LIB,  NODEFLIB. 

Listing  control:  COMMENT,  ECHO,  MAP,  TITLE,  TRIAL. 

Naaing  modules  and  conaon  blocks:  COMMONS,  DYNAMIC,  FORCE,  MODULES. 
Error  message  control:  DUPENTRY,  MLEVEL,  REDEF,  USX. 

Entry  point  and  execution  control:  EQUIV,  SET,  XFER. 

Global  heap  aeaory  management:  HEAP,  LOWHEAP,  STACK. 

Memory  allocation  and  presetting:  ALIGN,  ORG,  PRESET. 

Symbolic  debugging:  SID,  SYMBOLS. 

Miscellaneous  COS~dependent  directives:  ABORT,  BCINC,  GRANT,  NOECHO, 

NORED,  PADINC,  SECURE. 

Miscellaneous  GLOBAL  DIRECTIVES:  CASE,  CPUCHECK. 

Additional  information,  including  directives  not  discussed  here, 
may  be  found  in  SR-0066  Segment  Loader  Reference  Manual. 


*  comment  A  comment. 

Examples:  TITLE-GLOBAL  DIRECTIVES 
* _ 

*  Global  directives 

*  _ 

BIN- ABC 

TITLE-TREE  DIRECTIVES 
* _ 

*  Tree  directives 

*  _ _ _ 

TREE 

ROOT (A, B) 

ENDTREE 
TITLE-SEGMENTS 
* _ 

SEGMENT-ROOT 
*  ROOT  directives 
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ABORT-ON  |  OFF 

Control  SEGLDR  error  termination. 

Values:  ON  -  abort  if  errors 

OFF  -  terminate  normally  even  if  errors 

Default:  ABORT-ON 


ABS-dn  The  dataset  to  contain  the  absolute  module. 

Default:  $ABD 

Examples:  ABS-myprog 


ALIGN- IGNORE  |  NODULES  |  NORMAL 

Control  the  starting  locations  of  modules  and  commmon 
blocks. 

Values:  IGNORE  -  start  each  module's  local  or  common 

block  at  the  word  following  the 
previous  one  (ignore  align  bit) 

NODULES  -  start  each  module's  local  block  and 
common  block  (if  the  align  bit  is 
set)  at  an  instruction  buffer 
boundary  (32  words) 

NORMAL  -  start  each  module's  local  or  common 
block  with  the  align  bit  set  at  an 
instruction  buffer  boundary  (32  words) 

Default:  ALIGN-NORMAL 


BIN-dnl , dn2 , . . . 

Datasets  containing  the  relocatable  modules  to  be  loaded. 

Default:  BIN-SBLD 

Examples:  BIN-myf ile.yourf ile, 
theirfyl 
BIN-oldf ile 


CASE-UPPER  j  NIXED 

Control  character  conversion  in  directives. 

Values:  UPPER  -  convert  to  upper  case 

MIXED  -  do  not  convert 


Default:  CASE-UPPER 
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COMMONS-b 1  k  1 :  s izl , bl k2 : s iz2 , . . . 

Specify  the  order  to  load  eoaon  blocks. 

Values:  blki  -  nase  of  a  coaaon  block 

sizi  -  n  -  decimal  size 

0  -  first  occurrence  of  this  block  sets 
the  size 
(default:  0) 

Examp 1 e  s :  COMMONS-ayb lk : 1 00000 , da  t  a 1 

A —  MYBLK  is  100,000  words  (no 

matter  how  it  is  defined);  DATAl 
has  its  first  encountered  length 


DUPENTRY-ERROR  |  WARNING  J  CAUTION  !  NOTE  \  COMMENT  !  IGNORE 

Specify  the  message  level  for  a  duplicate  entry  point. 

Default:  DUPENTRY-CAUTION 


DYNAMIC-eomblk 

DYNAMIC-// 

Name  a  common  block  to  be  located  after  the  largest  segment 
or  the  heap  (if  required).  You  control  its  size.  It  is 
always  available  to  the  program  and  cannot  be  preloaded 
with  data. 

Values:  a  COMMON  block  name  or  //  (blank  common) 

Default:  no  dynamic  common  blocks 

Examples:  DYNAMIC-ARRAYS 

A —  common  block  /ARRAYS/  is  dynamic 

ECHO-ON  |  OFF 

Resume  or  suppress  listing  of  input  directives. 

Default:  ECH0-0FF 


EQUIV-epname (synl,syn2, . . .) 

Substitute  a  call  to  one  entry  point  for  a  call  to 
another. 

Values:  epname  -  the  entry  point  to  be  used  in  the 

substitution 

syni  -  an  entry  point  to  be  replaced  by 

epname 
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Examples:  ... 

CALL  A 
•  •  « 

CALL  B 


EQUIV-C(A.B) 

A —  replaces  the  calls  to  A  and  B 
by  calls  to  C 


FORCE-ON  !  OFF 

Control  the  forced  loading  of  modules  whose  entry  points 
are  never  called. 

Default:  FORCE-OFF 


LIB-libl , lib2, . . . 

Libraries  to  be  searched  for  routine  not  included  in  BIN- 
files. 

Examples:  ACCESS, DTLIB.OWN-NSYS.  <—  DTRC  subroutine 

library 

ACCESS, sublib.  < —  your  subroutine 

library 

SEGLDR.CND-'LIB-sublib.DTLIB' , . . . 


MAP-NONE  |  STAT  j  ALPHA  \  ADDRESS  j  PART  |  EPXRF  \  CBXRF  |  FULL 

Control  the  map  listing. 

Values:  NONE  -  no  map 

STAT  -  list  load  statistics:  date/time, 

longest  branch  length,  last  segment, 
transfer  entry  point,  stack  and  heap 
information 

ALPHA  -  STAT  ♦  block  map  for  each  segment 
(modules  in  alphabetical  order) 
ADDRESS  -  ALPHA  but  modules  in  address  order 
PART  -  ALPHA  +  ADDRESS 

EPXRF  -  STAT  +  entry  point  cross  reference 
CBXRF  -  STAT  +  common  block  cross  reference 
FULL  -  PART  +  EPXRF  +  CBXRF 

Default:  MAP-NONE 

Examples:  KAP-STAT 

NAP-EPXRF, CBXRF 
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MLEVEL-ERROR  j  WARNING  |  CAUTION  |  NOTE  |  COMMENT 

Print  messages  down  to  and  including  the  level  specified 
(has  no  effect  if  L-0) . 

Default:  MLEVEL-CAUTION 

Examp 1 es :  MLEVEL-NOTE 

A —  print  error,  warning,  caution, 
and  note  messages 


MODULES-modl : ds 1 , aod2 : ds2 , . . . 

The  aodules  to  be  included  and,  optionally,  the  dataset 
containing  a  specific  module. 

Values:  aodi  -  name  of  module  to  be  loaded 

dsi  -  optional  dataset  containing  the  module 

Examples :  MQDULES-subl isublib, sub2, sub3: your lib 
MODULES-sub4,sub5 

A“  get  SUB1  from  SUBLIB;  SUB 3  from 
YOURLIB;  SUB2,  SUB4,  SUB5  from 
the  first  dataset  containing  them 


NODEFLIB  Do  not  search  the  default  libraries.  Search  only  BIN  and 
LIB  datasets. 

NOTE:  Segmented  loads  must  specify  the  file  containing 
routine  $SEGRES. 

Examples:  NODEFLIB;  LIB-sublib,DTLIB,$SCILIB 


ORDER-MODULES, COMMONS  |  COMMONS , MODULES  \  XMP.EMA 
Load  modules  before  or  after  commons. 

Values:  XMP.EMA  -  most  efficient  allocation  on  X-MP 

having  more  than  4  million  words 

Defaults:  ORDER-MODULES , COMMONS  (<-4  million  words) 
ORDER-XMP . EMA  (>  4  million  words) 


PRESET-ONES  j  ZEROS  i  INDEF  j  -INDEF  J  value 
Preset  uninitialized  data  areas. 

Values:  ONES  -  set  to  -1 

ZEROS  -  set  to  0 

INDEF  -  set  to  octal  06050540000000000000000 
-INDEF  -  set  to  octal  16050540000000000000000 
value  -  16-bit  value  placed  in  each  parcel 
(0  <  value  <  177777  octal) 


Default 


PRESET-ZEROS 
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SID 


SYMBOLS-ON  | 


TITLE-title 

TITLE 


TRIAL 


USX-WARNING 


Load  £or  debugging.  Symbol  tablet  are  written  to  SDEBUG 
(or  SYMBOLS-dn) . 

Default:  Normal  load 

OFF  J  dn 

Specify  program  symbol  table  handling. 

Values:  ON  -  write  symbol  table  to  $DEBUG 

OFF  -  ignore  symbol  table 

dn  -  write  symbol  table  to  dn 
(dn  may  not  be  ON  or  OFF) 

Default:  SYMBOLS-ON 


Define  the  second  line  of  each  page  header.  A  page  eject 
is  forced. 

Value:  title  -  a  string  of  0-74  characters 

(ends  with  end-of-line  or  semicolon) 
omitted  -  clear  the  second  header  line 

Examples:  TITLE-This  is  a  user  title,  reallyl 


Do  not  generate  an  executable  module.  Lets  you  get  the 
load  map,  determine  optimal  memory  usage  for  data,  or 
get  the  total  memory  required. 

Examples:  TRIAL 
i  CAUTION  |  IGNORE 

Specify  how  to  treat  unsatisfied  externals. 

Values:  WARNING  -  issue  a  warning  message; 

do  NOT  write  executable  output 
CAUTION  -  issue  a  caution  message; 

write  executable  output 
IGNORE  -  issue  no  message; 

write  executable  output 


Default 


USX-CAUTION 
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***  Segmentation  *** 

To  make  a  large  prograa  fit  into  memory,  it  may  be  structured  in 
segments,  so  that  only  a  portion  of  the  program  resides  in  memory. 

By  using  the  tree  structure  directives  of  SEGLDR,  different 
arrangements  of  a  prograa  can  be  tried,  without  changing  the  prograa, 
until  the  best  is  achieved. 


**  Segmentation  Directives  ** 

Tree  definition:  TREE,  tree_def inition,  ENDTREE. 

Segment  description:  SEGMENT,  BIN,  COMMENT,  COMMONS,  DUP,  ECHO, 

MODULES,  SAVE,  TITLE,  ENDSEG. 

Global:  COPY,  SAVE,  SLT. 


BIN-dnl ,dn2, . . . 

Datasets  containing  the  relocatable  modules  to  be  loaded. 
Only  the  first  file  of  each  dataset  is  processed. 

Default:  BIN-SBLD 

Examples:  SEGKENT-birch 

BIN-myf ile.yourf ile, 
theirfyl 
BIN-oldf ile 
ENDSEG 

* —  all  modules  in  datasets  MYFILE, 
YOURFILE,  THEIRFYL,  and  OLDFILE 
are  loaded  into  segment  BIRCH 


COMMONS-blkl : s izl , blk2 : s iz2 , . . . 

Specify  the  order  to  load  common  blocks. 

Values:  blki  -  name  of  a  common  block 

sizi  -  n  -  decimal  size 

0  -  firnt  occurrence  of  this  block  sets 
the  size 
(default:  0) 

Examples :  COMMONS-myblk : 100000, datal 

A —  MYBLK  is  allocated  100,000  words 
(no  matter  how  it  is  defined); 
DATAl  has  its  first  encountered 
length 


i 
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COPY 


DUP-mod(segl 


ENDSEG 


ENDTREE 


MODULES-modl 


Force  the  program  to  execute  from  a  scratch  file.  This 
may  speed  program  execution,  especially  of  programs  with 
segments  which  are  loaded  many  times,  because  a  faster 
form  of  I/O  is  used.  SAVE-ON  also  forces  the  use  of  a 
scratch  file. 

Default:  a  scratch  file  is  not  used 


,  s  eg2 , • • .) 

Specify  that  a  module  is  to  be  loaded  into  several 
segments.  DUP  must  appear  before  the  definitions  of  the 
segments  into  which  the  module  is  to  be  placed. 

An  alternate  way  is  to  list  the  module  in  the  MODULES  or 
COMMONS  directive  of  each  segment. 

Examples:  DUP-sub3(segl,seg2)  root 

SEGMENT-segl  _ | _ 

MODULES- sub 1  1 


COMMONS-coml 

segl 

seg2 

ENDSEG 

SEGMENT- s s g2 

coml 

coml 

M0DULES-sub2 

subl 

sub2 

COMMONS-coml 

SUB3 

SUB  3 

ENDSEG 


End  the  definition  of  a  segment  of  a  tree  structure. 
Examples:  see  SEGMENT 


End  the  definition  of  a  tree  structure. 
Examples:  see  TREE 


mod2 , . . . 

(segment)  List  the  modules  to  be  put  into  the  segment. 

Values:  modi  -  module  name  and  optional  dataset  from 

which  it  is  to  be  loaded  (mod:ds) 

Examples:  MODULES-m:binm,n, o 

A —  load  module  M  from  dataset  BINM 
and  modules  N  and  0  from  the 
first  dataset  which  contains 
them 
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SAVE-ON  j  OFF 

(Global)  Specify  whether  all  segments  are  to  be  laved 
(written  to  disk)  before  being  overlaid.  SAVE  in  a 
segment  overrides  the  global  SAVE. 


Values:  OFF  -  do  not  save  each  segment 

ON  -  save  each  segment 


Default:  SAVE-OFF 


Examples:  SAVE-ON 
TREE 

one (two, three) 
ENDTREE 
SEGMENT-one 
MODULES- subl 
SEGMENT-two 
MODULES-sub2,sub3 
SEGMENT-three 
SAVE-OFF 
MODULES- subA 
ENDSEG 


one 

subl 

i 

t - ' - r 

i  i 


two 

three 

sub2 

sub  A 

sub3 

SEGMENT-segname 

Begin  the  description  of  the  contents  of  one  segment  of  a 
tree. 

Examp 1 es :  SEGMENT-oak 

MODULES-k , 1 , m 
COMMONS-//, oakcom 
ENDSEG 


TREE 


End  the  global  directives  and  start  the  definition  of  a 
tree  structure. 

Examples:  TREE 

tree  structure 
ENDTREE 
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tree  segment  structure 

Define  the  tree  structure,  that  is,  the  segments  in  each 
branch  of  the  tree.  The  order  of  these  definitions  is 
uniaportant. 

Syntax:  segnaae(segl,seg2, . . .) 


Exaaples:  TREE 

a(b,c) 
b(d,e) 
c(f ,g,h) 
f (i.j) 
ENDTREE 
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**  Sample  Tree  Diagram  ** 

A  block  data  subprogram  defines  common  /COM1/  which  is  to  be  loaded 
with  program  S2.  /C0M1/  is  also  referred  to  by  S6  and  S7. 


PEAR 

(MYMAIN) 

i 


1 - 1 - 

1  1 

PLUM  APPLE 

- 1 - 

i 

LIME 

I 

BEECH 

1 

1 

DOGWOOD 

(SI)  (/COM1/) 

(S3) 

(S4) 

(S5) 

(S2) 

(S12) 

(S9) 

\ 

(F10) 

l  '  1 

1  1 

(Sll) 

CRAB  ROME 

(S6)  (S7) 

<S6  and  S7  use  /C0Ml/> 

TREE 

pear (plum, app 1 e , 1 ime , beech , dogwood) 
app 1 e (crab , rose) 

ENDTREE 
SEGMENT-pear 
MODULES-mymain 
SEGMENT- plum 
MODULES-* 1 
SEGMENT- app 1 e 
MODULES-s2 
COMMONS-coml 
SEGMENT- line 
M0DULES-s3 
SEGMENT-beech 
M0DULES-s4,sl2 
SEGMENT-dogwood 
MODULES-s5,s9, f 10,sll 
SEGMENT-crab 
M0DULES-s6 
SEGMENT- rome 
MODULES-* 7 
ENDSEG 


* 


i 
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**  Segmentation  Cautions  ** 

1.  To  develop  a  segmented  job,  several  runs  may  be  required,  so 
relocatable  object  code  should  be  SAVEd.  Common  blocks  and  some  system 
routines  may  need  to  be  included  in  lower  segments  to  operate  properly. 


2.  The  load  map  should  be  checked  carefully  for  any  duplicate  common 
block  entries.  The  same  common  block  may  appear  in  more  than  one 
segment,  each  being  considered  a  different  common  block.  References 
are  to  the  common  block  in  the  segment,  if  none,  then  to  the  one  on 
the  same  branch.  If  a  given  common  block  is  to  appear  only  once  in 
a  program  (the  normal  case) ,  then  it  should  be  placed  in  the  segment 
nearest  to  the  root  segment  which  can  be  referenced  by  all  segments 
which  use  it. 
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***  Compile,  Load  and  Save  an  Abaolute  Program  *** 


**  Simple  Load  ** 

JOB , JN«j obname , . . . . 

ACCOUNT . 

CFT. 

SEGLDR , CMD- ' ABS-myprog ' . 

SAVE,DN-myprog,PAM“R.  < —  read  only 

/EOF 

PROGRAM  MYPROG  (. . . 

•  e  • 

/EOF 


**  Segmented  LOAD  ** 

JOB , JN- j obname , . . . . 

ACCOUNT,.... 

CFT. 

SAVE,DN-$BLD,PDN-myprogob.  < —  save  relocatable  modules  for 

possible  re-segmentation 

SEGLDR. 

SAVE , DN-mypr og ,  PAM“R .  < —  read  only 

/EOF 

(CFT  source  program) 

/EOF 

ABS-myprog 

TREE 

e  e  e 

ENDTREE 
SEGMENT" . . . 

e  e  e 

ENDSEG 

SEGMENT-... 

e  e  e 

ENDSEG 
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*****  xhe  Haas  Storage  Systea  ***** 

The  Hass  Storage  Systea  (HSS)  is  a  large  capacity  on-line  aass 
storage  device.  It  is  a  cost  effective  extension  to  the  Cray,  CDC  and 
VAXcluster  disk  systeas  and  conventional  awgnetic  tape  storage. 
Specifically,  the  HSS,  which  is  part  of  the  CDC  CYBER  860A,  offers: 

.  Hore  than  20  tiaes  the  on-line  storage  of  the  VAXcluster  systea; 
aore  than  40  tiaes  the  on-line  storage  of  the  Cray  X-HP. 


.  On-line  access  to  files  which  previously  had  to  be  stored  on 
aagnetie  tape  because  of  size  restrictions  and/or  infrequent  use. 

.  Reduced  storage  charges  for  these  on-line  files. 


***  MSS  Security  *** 

To  provide  adequate  security  for  HSS  users,  you  aust  subait  your 
HSS  (CYBER  860)  password  in  any  non-CDC  job  or  interactive  session 
which  will  aanipulate  HSS  files.  To  protect  your  HSS  files,  you  aust 
change  this  password  at  least  every  90  days  using  the  PASSWOR  coaaand 
on  the  CDC  CYBER  860A  or  the  HFT  PASSWORD  coaaand  on  the  VAXcluster. 


***  HSS  File  Purge  *** 

HSS  files  aay  be  purged  by  the  Coaputer  Center  if  the  job  order 
nuaber  is  invalid  or  has  been  cancelled. 

To  recover  purged  files,  call  User  Services,  Code  1893.1,  (202) 
227-1907.  A  noainal  fee  will  be  charged  for  this  service.  After  the 
files  have  been  restored,  you  aust  change  to  your  valid  job  order 
nuaber  (on  860:  CHANGE, pfn/CP  or  BEGIN, NEWCHRG) . 
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***  MSS  Backup  for  Critical  File*  *** 

In  addition  to  normal  file  backup,  critical  direct  files  may  be 
backed  up  and  stored  off-station.  These  files  are  available  in  the 
event  of  a  catastrophe  (such  as  fire)  at  the  Carderock  Computer  Center. 

For  a  file  to  be  designated  as  "critical",  it  must  have  the 
attribute  Backup  Requirement  (BR)  set  to  critical  (CR) .  This  is  done 
by  specifying  "BR»CR"  if  the  file  is  critical,  or  "BR~Y"  if  it  is  not, 
when  the  file  is  made  perawnent.  The  default  is  BR*Y  meaning  on- 
station  backup.  For  example: 

DEFINE, lfn“mfn/BR“CR.  < —  store  a  critical  file 

CHANGE, mfn/BR“CR.  < —  make  a  file  critical 

CHANGE, mfn/BR*Y.  < —  make  a  file  non-critical 

Files  designated  for  this  off-station  backup  service  will  be  charged 
a  higher  rate. 

Because  an  indirect  file  is  just  part  of  a  larger  file  (page  5-1-6) 
that  may  contain  several  users'  files,  it  cannot  be  designated  as 
critical. 
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***  Uaiog  the  MSS  from  the  Cray  *** 

A  description  of  the  syntax  of  these  commands  say  be  found  in 
Appendix  B. 

ACQUIRE  Transfer  a  file  from  the  MSS  as  a  local  dataset  and  sake  it 
peraanent  on  the  Cray. 

Examples :  ACQUIRE ,  MI-SOURCE , SDN -MY FILE , PEW -MY FILE, MF-N1 , A 

TEXT- 'USER, user, pw. ATTACH, MYFILE.CTASK. ' . 

A —  transfer  your  direct  MSS  file 
MY FILE  as  local  dataset  SOURCE 
and  sake  it  a  peraanent  dataset 
named  MYFILE 

ACQUIRE , DN-DATA46 , PDN-DATA46 ,MF-Nl , A 
TEXT- ' USER , us er , pw . ' A 

' ATTACH , DATA46 /UN-ABCD , PM- f i 1 epw . CTASK . ’ . 

A —  transfer  user  ABCD's  MSS  file 
DATA46  (assuming  you  have 
permission  to  read  the  file)  as 
local  dataset  DATA  and  make  it 
a  peraanent  dataset  named  DATA46 


DISPOSE  Transfer  a  Cray  local  dataset  to  the  MSS. 

Examples:  DI SPOSE .DN-FT13, MF-N 1 , SDN-MYOUT 1 3 , DC-ST , A 
TEXT- 'USER, user, pw. ,A 

'PURGE, MYOUT13/NA. ,A 
' DEFINE, MY0UT13. ' A 
'CTASK. ' . 

A —  local  dataset  FT13  is 

transferred  to  the  MSS  where  it 
will  be  known  as  MYOUT13 


FETCH  Transfer  a  file  from  the  MSS  as  a  local  dataset.  It  is 
released  at  the  end  of  the  job. 

Examples  j  FETCH ,  MI-SOURCE , SDN-MYFILE , MF-N 1 , A 

TEXT- 'USER, user, pw. ATTACH, MYFILE. CTASK. ' . 

A —  transfer  your  MSS  file  MYFILE  as 
local  dataset  SOURCE 

FETCH , DN- ABDATA , MF-N 1 , TEXT- ' USER , user , pw. ' A 

’ ATTACH , ABDATA/UN-ABCD , PW-f i 1 epw . CTASK . ' . 

A —  transfer  user  ABCD's  MSS  file 
ABDATA  as  local  dataset  ABDATA 

FETCH , DN-SOURCE , SMI-MYFILE , MF-N1 , A 

TEXT- 'USER, user, pw. GET, MYINDF. CTASK. ' . 

A —  transfer  your  CYBER  860  indirect 
file  MYFILE  as  local  dataset 
SOURCE 
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The  following  procedures  simulate  the  MSS  commands  of  the  CDC 
NOS/BE  system  at  DTRC.  To  use  them,  you  must  first 

ACCESS , DN-PROCLIB , OWN-PUBLIC .  < —  access  the  procedure  library 

LIBRARY, DN-PROCLIB:*.  <—  add  to  your  library  set 


MSACCES  Supply  your  Username  and  password  to  the  MSS.  MSACCES  is 
required  before  you  can  MSFETCH,  MSPURGE  or  MS STORE. 

Examples:  MSACCES, US-myid.MPW-mymsspw. 


MSFETCH  Fetch  a  direct  file  from  the  MSS. 

Examp 1 es :  MSFETCH , DN- inf y 1 , MDN-myda t  a . 

* —  your  file  in  transparent  mode 

MSFETCH ,  DN-prog , MDN-othrpgm , UN-ABCD , PW-pgmpw . 

A —  another  user's  file 

MSPURGE  Purge  an  MSS  file. 

Example:  MSPURGE ,DN-myfyle. 


MSSTORE  Store  a  file  on  the  MSS  as  a  direct  file. 

Examp 1 es :  MSSTORE , DN«out 1 , MDN-out  f yl 1 , NA- 1 . 

A —  overwrite  if  file  already  exists 

MSSTORE , DN- f yl 2 , MDN-fi 1 e2 , DF-CB . 

A —  file  is  stored  in  CDC  Display 
Code 
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***  Using  the  MSS  from  the  VAXcluster  *** 

A  description  of  the  syntax  of  these  commands  may  be  found  by 
typing  "HELP  HFT"  on  the  VAXcluster. 

HFT  HYPERchannel  (direct)  File  Transfer. 

Examples :  HFT  ACCESS  /U-ABCD  /A-1222233344  /P-MSS_pas sword 

A —  gain  access  to  the  MSS 

HFT  CHANGE  "MYFILE/AC-newac,CT-PU" 

A —  change  account  number  of  MSS 
file  MYFILE  and  make  it  public 

HFT  DEFAULT 

A —  display  your  current  ACCESS 

values 

HFT  DELETE  MYFILE 

A—  delete  MSS  file  MYFILE 

HFT  DIRECTORY 

A —  audit  your  MSS  file  names 

HFT  DIRECTORY  "LO-F" 

A —  full  audit  of  your  MSS  files 

HFT  FETCH  MYPROG  MYPROG.FOR 

A~  fetch  your  MSS  file  MYPROG  and 
make  it  permanent  file 
MYPROG.FOR 

HFT  PASSWORD 
old  password 
new  password 
new  password  repeated 

A —  change  your  MSS  password 

HFT  PERMIT  "MYFILE/UN-xxxx, M-R" 

A —  give  read  access  to  user  xxxx 

HFT  STORE  MYPROG.FOR  "MYPROG/CT-S" 

HFT  STORE  MYPROG.FOR  "MYPROG/CT-S"  /DELETE 

A —  store  your  file  MYPROG.FOR  on  the 
MSS  as  MYPROG  (/DELETE  will 
delete  your  VAXcluster  permanent 
file) 
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MSSAUDIT  Audit  your  MSS  files  in  a  variety  of  foraats. 

Examples:  MSSAUDIT  S  < —  get  a  sorted  short  audit  of 

your  MSS  files  at  the  terminal 

MSSAUDIT  F  MSSAUDIT. LIS 

A —  put  a  sorted  full  audit  of  your 
MSS  files  into  file  MSSAUDIT. LIS 

MSSAUDIT  0  UN-xxxx 

A —  display  a  sorted  list  of  the  MSS 
files  owned  by  user  xxxx 
(assuming  you  have  permission  to 
see  them) 


MSSBACKUP  Store  several  files  in  a  single  file  on  the  MSS,  retaining 

each  file's  characteristics.  Fetch  individual  files  from  the 
MSS  file  previously  stored  by  MSSBACKUP. 

Examples:  MSSBACKUP  STORE  *.*  VMS0322 

A —  store  all  your  files  in  a  BACKUP 
file  on  the  MSS 
(0322  is  the  date) 

MSSBACKUP  LIST  VMS0322  KEEP 

A —  list  the  contents  of  the  above 
BACKUP  file  on  MSS  at  your 
terminal,  keeping  the  .MSSBCK 
file  for  later  FETCHes  today 

MSSBACKUP  FETCH  VMS0322  RD* 

A —  fetch  the  files  beginning  with 
RD  (do  not  replace  any  existing 
versions) 

MSSB  DELETE  VMS0322 

A~  Delete  the  BACKUP  file  from  MSS 


MSSDELETE  Delete  several  MSS  files. 

Examples:  MSSDELETE  MYFILE 

A“  same  as  HFT  DELETE  "MYFILE" 

MSSD  F1,F2,F3,F4,F5 

A—  delete  5  MSS  files 
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MSSNEWCHRG 

Change  the  account  nuaber  on  your  MSS  £ilee. 

Exaaplea:  MSSNEWCHRG  1222233344  1234567890 

* —  change  job  order  nuaber  for 

all  files  currently  stored  with 
account  nuaber  1-2222-333-44  to 
1-2345-678-90 
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***  Using  the  MSS  from  the  CDC  CYBER  860A  *** 

The  MSS  is  just  a  peripheral  on  the  CDC  CYBER  860A.  All  files  on 
the  CYBER  860A,  whether  they  reside  on  disk  or  the  MSS,  are  accessed  by 
the  standard  NOS  permanent  file  commands . 


88/10/01 


RevO 


Page  A— 1—1 


*****  DEC  VAXcluster  —  VMS  ***** 

The  Digital  Equipment  Corporation  (DEC)  VAXcluster  has  four  central 
processing  units  (CPUs)  or  nodes  which  share  files  and  are  linked 
together.  There  are  two  VAX  11/780  CPUs,  each  with  16  megabytes  of 
memory,  and  two  VAX  8550s,  each  with  48  megabytes  of  memory.  Access  is 
via  the  DECserver  or  the  DECnet  network.  A  separate  VAX  8250  is  located 
in  Annapolis  and  is  accessible  via  the  TOFACS  selection  menu  or  the 
DECnet  network. 


***  VMS  Version  4.6  *** 

The  operating  system  for  the  DEC  VAXcluster  and  the  VAX  8250  at 
DTRC  is  called  VMS,  version  4.6. 

Permanent  files  (user  programs  and  data  files  retained  for  frequent 
use)  reside  on  disk  drives  and  the  Mass  Storage  System.  User  files, 
if  not  specifically  requested  on  a  tape,  will  be  assigned  to  available 
disk  areas. 


***  Accessing  the  VAXcluster  *** 

To  access  the  VAXcluster,  set  your  terminal  to  8-bit,  no  parity, 
then: 

.  dial  (202)  227-5600  * —  this  will  connect  you  with  the 

DECserver 

.  press  the  RETURN  key  until  it  displays  a  greeting  (usually 
1-3  times) 

.  in  response  to  the  Username:  prompt,  enter  your  User  Initials 
(the  DECserver  prompt  is  Local>  ) 

.  enter  SHOW  SERVICES  for  a  list  of  available  services  —  as  of 
the  publication  date,  these  are: 

.  780  -  any  DTRC  VAX  11/780 

.  8550  -  any  DTRC  VAX  8550 

.  CRAY  -  any  DTRC  VAX  front-end  to  the  Cray  X/MP 

.  DDN  -  Defense  Data  Network  (DTI) 

.  DTI  or  DT2  -  DTRC  VAX  11/780  DTI  or  DT2 

.  DT3  or  DT4  -  DTRC  VAX  8550  DT3  or  DT4 

.  VAX  -  any  DTRC  VAXcluster  node 

.  enter  "CONNECT  service"  (or  "C  service")  to  connect  to  the 
desired  node 

.  in  response  to  the  Username:  prompt,  enter  your  User  Initials 

.  in  response  to  the  Password:  prompt,  enter  your  login 

password  (the  default  VAXcluster  prompt  is  $) 
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***  Login  Password  *** 

Your  initial  login  paasword  is  your  username,  usually  your  user 
initials.  This  is  entered  in  response  to 

Password: 

the  first  tisie  you  log  in.  This  password  MUST  be  changed  during  your 
first  session. 

To  change  your  login  password,  type 
SET  PASSWORD 

You  will  be  prompted  for  the  current  password,  the  new  password,  and 
the  new  password  again  (to  insure  there  were  no  transmission  problems) . 

Your  password  should  be  changed  frequently,  and  must  be  changed  at 
least  every  90  days. 


***  Logout  Procedures  *** 

To  terminate  your  session,  get  rid  of  any  unwanted  permanent  files 
(remember  that  new  versions  of  a  file  may  be  made  frequently  during  the 
session  with  up  to  five  retained  and  costing  you  money.  You  may  also 
want  to  get  rid  of  any  journal  files  (.JOU)  made  by  EDT. 

When  this  is  done,  or  immediately,  if  the  Central  Site  operator 
requests  it,  type  LOGOUT.  A  time  and  usage  summary  of  the  session  and 
a  cost  estimate  will  be  displayed. 

You  will  be  returned  to  your  DECserver  session.  To  leave,  type 
LOGOUT. 


Note 

If  you  do  not  type  anything  for  about  13  minutes, 
you  will  be  logged  off  automatically.  You  are 
given  a  5-minute  warning. 


***  System  News  *** 

At  login,  a  system  bulletin  may  be  displayed.  For  more  details, 
type  NEWS.  To  see  earlier  news  items,  type  OLDNews.  To  see  ancient 
news  items,  type  VERYoldnews. 
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***  Login  Procedure  File  *** 

A  Login  Procedure  File  is  a  file  in  your  home  directory  with  the 
name  LOGIN.COM.  It  contains  commands  to  be  executed  each  time  you  log 
in  before  you  are  given  the  $  prompt.  Commands  and  qualifiers  should 
be  spelled  in  full  to  allow  for  possible  future  changes  in  the 
operating  system. 

Any  command  may  be  in  LOGIN.COM.  You  may  want  to  see  who  is  logged 
in  ($  SHOW  USERS),  or  look  at  your  home  directory  files  ($  DIRECTORY) 
or  all  your  files  ($  DIRECTORY  [...]),  or  define  one  or  more  of  your 
HELP  libraries  ($  ASSIGN  UOn: [myid]mylib  HLP$LIBRARY_5) .  You  should 
also  define  your  home  directory  with  a  logical  name  (such  as  your  first 
name,  but  NOT  your  username)  using  ($  DEFINE  myname  U0n:[xxxx]).  Then, 
you  need  only  type  myname:  to  refer  to  your  home  directory,  which  you 
may  need  to  do  frequently.  For  suggestions  of  other  commands,  symbols 
and  logical  names  you  might  include,  type  "HELP  LOGIN. C0M_Hints". 
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***  Filet  *** 

1.  Because  VMS  autoaatically  deletes  the  low  version  number  when  more 
than  5  versions  of  a  file  are  created,  you  should  not  use  different 
versions  of  a  file  for  different  purposes.  Instead  use  the  file  type 
field. 

2.  To  reduce  your  file  space  and,  therefore,  your  costs,  you  may  wish 
to  do  a  "PURGE  [xxxx...]"  every  now  and  then  to  remove  all  low 
versions  (or  "PURGE  [xxxx...]  /KEEP“2"  to  keep  the  highest  two 
versions . 

3.  When  editing  with  EDT  or  EVE,  a  journal  file  is  created  of  all  your 
editing  commands  for  use  in  re-editing  your  file  if  your  editing 
session  is  aborted  (AY  or  a  line  disconnect).  (If  your  editing  session 
ends  normally  (EXIT  or  QUIT),  the  journal  file  is  deleted.)  You  should 
check  periodically  for  any  journal  files  and  delete  them  if  they  are  no 
longer  needed.  Use  the  command  "DIRectory  /DATE  [...]*. JOU,*.TJL"  to 
see  them. 


***  Batch  Jobs  *** 

A  batch  job  is  a  procedure  which  is  submitted  by  the  SUBMIT  command. 
By  default,  the  job  will  be  executed  on  either  DTI  or  DT2.  If  your  job 
must  run  on  a  specific  node,  use  the  /QUEUE~DTn_BATCH  qualifier  (n  is 
the  desired  node  number).  See  page  1-3-1  ff  for  a  table  of  the  nodes 
on  which  specific  software  is  available. 
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***  Accessing  Other  Network*  *** 

DTRC  also  has  access  to  the  following  networks: 

DDN  -  the  Defense  Data  Network  (also  called  INTERNET) 

(host  tables  allow  transfer  to  soae  other  networks) 

TOFACS  -  the  DTRC  Office  Autonation  Systen 

The  following  can  be  reached  froa  our  DECnet  using  SET  HOST: 

NAVAIR  node  naaes:  HORNET 

NAVSEA  node  naaes:  SEAHUB,  SEAA,  SEAfi,  SEAC,  SEAD,  SEAE 


**  Transferring  VMS  Files  To  and  Froa  TOFACS  ** 


While  logged  into  DTI: 


ftp  dtrc.arpa  < — 

-or- 

ftp  dtrc  < — 

login  < — 

<user  naae>  < — 

<password>  < — 

get  < — 

<TOFACS  filenaae> 

<VMS  filenaae> 

put  < — 

<VHS  filenane> 

<T0FACS  filenaae> 

bye  < — 


File  Transfer  Protocol  to  TOFACS 
(dtrc)  via  DDN 

via  Ethernet 
to  log  into  TOFACS 
your  TOFACS  user  naae 
your  TOFACS  password 

get  a  file  froa  TOFACS 


send  a  file  to  TOFACS 


leave  ftp 
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**  Mail  to  User*  at  Other  Sites  ** 

Mail  nay  be  sent  to  users  at  other  sites  which  are  accessible  via 
DON .  This  is  one  way  to  transfer  large  (or  small)  files. 

While  logged  into  VMS: 

$  mail 
MAIL>  send 

To:  winsX"<user@hostname>"  < —  where  some  typical  hostnames 
...  are:  dtrc.arpa,  tofacsa.arpa, 

icst-is.arpa,  gwuvax.gwu.edu) 

For  example,  to  send  a  message  to  "sommer"  on  dtrc  (TOFACS  B  system) 
from  node  DT4: 

$  mail 
MA1L>  send 

To:  dtl: :wins2"sommer@dtrc"  < —  the  brackets  are  optional 


Mail  is  sent  via  the  VMS  siail  utility  and  the  Simple  Mail  Transfer 
Protocol  (SMTP).  The  "To:"  address  has  one  of  the  following  forms: 


Destination 

Address  Syntax 

Utility 

same  VAX 

user 

local 

VMS  mail 

same  network 

node: :user 

DECnet 

another  VAX 

winsZ"<user@host>" 

SMTP 

remote  host 

winsT"<user@hos t  >" 

SMTP 

remote  host  routed 
through  other  hosts 
on  your  network 

winsV<@host  , @host  :user@host>" 

SMTP 

remote  host  on  another 
network  routed 
through  a  gateway 

wins V<#hos t , ^gateway :user@host>" 

SMTP 

SMTP  is  on  node  DTI.  Therefore,  WINS*  must  be  preceded  by  "DTI::"  if 
used  from  another  node  on  the  VAXcluster.  For  example, 

DTI : :WINSX"<user8host>" . 

Note  that  local  VMS  and  DECnet  mail  is  sent  immediately;  SMTP  mail  is 
sent  every  20  minutes. 
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*****  Help  Libraries  ***** 

A  help  library  (£ile  type  .HLB)  contains  help  nodules,  that  is, 
modules  that  provide  information  about  a  program,  subprogram, 
procedure,  or  some  general  help  information  such  as  hints  on  how  to  do 
something.  It  is  created  and  accessed  using  the  following  DCL 
commands: 

LIBRARY  Create,  maintain,  list,  and  extract  modules  from  a  help 

library. 

HELP  Display  the  desired  helps. 

***  The  System  Help  Library  *** 

The  system  help  library  is  read  using  the  DCL  command  HELP.  It 
provides  help  about  the  HELP  program  and  lists  many  topics  (VMS 
features,  DCL  commands.  Hints,  and  other  general  information). 

***  DTRC  Help  Libraries  *** 

Five  help  libraries  have  been  added  to  VMS  at  DTRC: 

CCF  -  General  information  about  the  Computer  Center 

COS  -  Cray  COS  JCL  commands 

CRAY  -  Routines  added  to  Cray  at  DTRC 

DTLIB  -  Subprograms  in  library  DTLIB  (Cray,  CDC  NOS,  VMS) 

UTILITIES  -  Utility  programs  and  procedures 

When  executing  the  HELP  command,  the  additional  help  libraries  are 
accessed  by  entering  '8name',  where  'name'  is  one  of  the  help  libraries 
listed  above  (e.g.,  8DTLIB)  in  response  to  'Topic?'.  For  a  table  of 
contents  of  any  of  the  above  libraries,  type 


HELP  8name  Contents 
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***  (Jeer  Help  Module  *** 

A  help  module  (default  file  type  .HLP)  ia  a  file  containing  all  the 
help  information  for  one  or  more  programs,  procedures,  etc.  Column  1 
of  each  line  identifies  the  different  sections  of  the  help  module.  A 
digit  indicates  a  keyword;  a  slash  (/)  indicates  a  qualifier;  anything 
else  is  part  of  the  help  text.  For  example, 

1  key-1  < —  HELP  topic 

help  message  text 

e  e  e 

2  key-2  < —  HELP  sub-topic 

e  e  e 

help  message  text 

e  e  e 

n  key-n 

e  e  e 

help  message  text 

•  e  e 

1  key-1  < —  next  HELP  topic 

A  "1"  line  gives  the  topic  name  (up  to  15  characters,  avoid  using 
blanks;  replace  blanks  with  an  underscore  (_)).  A  "2"  line  is  a 
sub-topic  of  the  'T'-level  topic;  a  "3"  line  is  a  sub-topic  of  the 
most  recent  "2"-level  sub-topic;  etc.  Qualifiers  (/  in  column  1)  will 
be  listed  separately  by  HELP  and  will  all  be  displayed  if  the 
(sub) topic  they  qualify  is  selected. 

A  help  module  might  look  something  like: 

1  topic 

description  of  topic> 

2  Qualifiers 

<optional  description  of  qualifiers> 

/topic_qualif ier_l 
description  of  topic_qualif ier_l> 

/topic_qualif ier_2 
description  of  topic_qualif ier_2> 

/ t op i c_qual i f i er_3 
description  of  topic_qualif ier_3> 

2  sub-topi c_l 

description  of  sub-topic> 

3  sub-topic_of_sub-topic_l 
description  of  sub-sub-topi c> 

3  Qualif iers_of_sub-topic_l 
dptional  description  of  qualifiers> 

/sub~topic_l_qualif ier_l 
description  of  qualifier_l  of  sub_topic  1> 

/sub-topic_l_qualif ier_2 
description  of  qualifier_2  of  sub_topic  1> 
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***  Hints  For  Designing  Help  Displays  *** 

While  help  aessages  can  continue  without  interruption,  you  may  wish 
to  £oraat  the  aessages  to  fit  the  screen  display.  A  topic  ("1"  in 
coluan  1)  will  have  17  lines  in  the  first  display;  a  sub-topic  ("2"  in 
coluan  1)  will  have  15  lines;  a  sub-sub-topic  ("3"  in  coluan  1)  will 
have  13  lines;  etc.  For  all  levels,  the  second  and  following  displays 
have  20  lines.  Level  1  lines  should  not  exceed  78  coluans;  level  2 
lines  should  not  exceed  76  coluans;  level  3  lines,  74  coluans;  etc. 
Longer  lines  aay  "wrap  around". 

Every  help  library  should  have  a  module  called  "HELP11  to  describe 
the  help  library. 

You  aay  wish  to  have  a  table  of  contents  aodule  (suggested  name 
"Contents")  to  list  the  routine  names  and  give  a  short  description  of 
what  each  routine  does. 

If  possible,  the  first  help  screen  for  a  program,  subprogram  or 
procedure  should  contain  all  that  is  needed  to  use  it.  Definitions  of 
paraaeters  and  qualifiers  should  be  put  into  sub-topics. 


***  Selecting  (Sub) topic  Naaes  *** 

While  you  aay  choose  anything  you  want  for  topic  and  sub-topic 
naaes,  we  recoaaend  the  following  conventions: 

.  use  upper  case  for  routine  naaes,  paraaeters,  and  qualifiers 
(e.g.,  AUXPRINT,  /CC,  /HEADER,  JGDATE,  FLR  below) 

.  use  lower  case  (first  letter  upper  case)  for  general  information 
(e.g.,  Paraaeters,  Qualifiers,  Examples,  Adain_info  below) 

.  replace  blanks  with  underscores  (_)  so  that  the  name  will  be 
listed  as  a  single  eleaent  by  HELP  (e.g.,  Admin_info  below) 


***  Create  a  Help  Library  *** 

The  LIBRARY  eoamand  is  used  to  create  a  help  library. 

LIBRARY  /HELP  /CREATE  help_library_naae 
-or- 

LIBRARY  /HELP  /CREATE- (option, .. .)  help_library_naae 

where  help_library_naae  is  the  naae  of  the  library  to  be  created.  It 
will  have  the  default  filenaae  help_library_naae.HLB. 
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The  following  options  nay  be  specified: 


BLOCKS:n  The  nuaber  of  512-word  blocks  to  be  allocated, 
(default:  100) 

HISTORY:n  The  naxiaua  nuaber  of  library  update  history  records 
to  be  naintained. 

(default:  20) 

KEYSIZE:n  The  siaxiaua  length  of  nodule  naaes. 

(default:  15) 

M0DULES:n  The  naxiaua  nuaber  of  nodules  the  library  can  hold, 
(default:  256) 


***  Modify  a  Help  Library  *** 

The  LIBRARY  coaaand  is  used  to  insert,  and  delete  help  library 
nodules.  Wildcards  are  allowed  in  nodule  nanes. 

LIBRARY  /HELP  /INSERT  help_iibrary_nane  help_nodule_nane 

LIBRARY  /HELP  /REPLACE  help_l ibrarynane  help_nodule_nane 

LIBRARY  /HELP  /DELETE- (nodule [,...] )  help_library_nane 

'LIBRARY  /HELP  help_library_nane  helpmodulenane '  is  the  sane  as  if 
'/REPLACE'  were  specified.  If  '/LOG'  is  specified,  a  nessages  will  be 
displayed  for  each  operation  done.  (E.g.,  LIBR  /HELP  /LOG  ...) 


***  Conpress  a  Help  Library  *** 

After  several  inserts,  deletes  or  replaces,  there  nay  be  a  lot  of 
"dead  space"  in  the  library.  To  renove  this,  that  is,  to  conpress  the 
library,  use: 

LIBRARY  /HELP  /COMPRESS  help_library_nane 


-or- 

LIBRARY  /HELP  /COMPRESS- (option, .. .)  help_library_nane 

/LOG  will  list  the  nodules  as  they  are  copied  into  the  conpressed 
library. 

The  options  available  are  the  sane  as  for  /CREATE. 
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***  List  the  Contents  of  a  Help  Library  *** 

The  LIBRARY  command  also  lists  the  contents  of  a  help  library. 

The  /LIST  qualifier,  which  may  be  specified  alone  or  with  any  of  the 
above  operations,  will  provide  information  about  the  library  including 
a  list  of  the  modules  in  the  library.  If  /FULL  is  also  specified,  the 
list  of  modules  will  include  the  date  and  time  it  was  inserted  into  the 
library.  If  /HISTORY  is  specified,  it  will  show  who  did  what  to  the 
library  and  when.  The  number  of  history  records  retained  is  defined 
when  the  library  was  created  or  compressed. 

For  a  list  of  the  library  without  other  operations,  use 

LIBRARY  /HELP  /LIST  -or- 

LIBRARY  /HELP  /LIST  /FULL  -or- 

LIBRARY  /HELP  /LIST  /FULL  /HISTORY 

The  list  will  be  displayed  on  SYSSOUTPUT.  To  put  the  listing  into  a 
file,  use  /LIST-f ilespec. 

To  list  information  about  specific  modules,  use  /MODULE* (list) 
where  <list>  is  a  comma-separated  list  of  module  names  with  wildcards 
allowed.  The  default  is  /MODULE-*. 

To  list  information  about  modules  inserted  after  a  certain  time, 
use  /SINCE  (for  those  inserted  today)  or  /SINCE-date_and_time  (for 
those  inserted  after  a  specific  date  and/or  time  (e.g.,  /SINCE*09:00 
for  those  after  9  AM  today) . 


***  Extract  a  Help  Module  *** 

To  extract  a  help  module  to  make  some  modifications  to  it,  use 

LIBRARY  /HELP  /EXTRACT- (module [,...] ) 

/OUTPUT-file-spec 
he 1 p_l i b  r ary_naae 

If  /OUTPUT  is  specified,  the  modules  are  put  into  file  <file~spec>.  If 
/OUTPUT  is  omitted,  they  are  put  into  file  help_library_name.HLP. 

Wildcards  are  allowed  in  module  names. 


***  Accessing  your  Help  Library  *** 

To  access  you  help  library,  use 

HELP  /LIBRARY-f ilespec  [  topic  [  sub-topic  ]  ] 

where  <filespec>  must  be  complete  (e.g.,  U09: [abed] my lib) ,  not  just  the 
filename. 
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***  Adding  Your  Help  Library  to  the  Syatea  Helpe  *** 

The  DCL  HELP  command  supports  many  user  libraries  in  addition  to 
the  system  library.  User  libraries  are  added  by  assigning  help  library 
names  to  HLP$LIBRARY_n,  where  n  is  oaitted  or  a  digit.  HLP$L1BRARY 
through  HLP$LIBRARY_4  are  already  defined  at  LOGIN.  You  may  add  your 
own  help  libraries  starting  with  HLP$LIBRARY_5.  For  example,  you  may 
wish  to  put 

$  DEFINE  /N0L0G  HLP$LIBRARY_5  UOn:  [myid]mylibl 

$  DEFINE  /NOLOG  HLP$LIBRARY_6  UOn:  [myid]mylib2 

into  your  LOGIN.COM  file  so  that  your  help  library  will  always  be  part 
of  the  system  HELP  coaaand  for  you.  The  first  missing  number  (in  this 
case  "7")  will  end  the  list.  These  will  be  listed  at  the  end  of  the 
last  screen  of  the  topic  display.  To  access  library  "5"  above,  use 
"HELP  $aylibl",  or  "ftnylibl"  at  the  Topic?  prompt. 


***  Using  HELP  *** 

The  HELP  command  access  the  system  help  library  ("HELP"),  your 
library  set  ("HELP  8libname") ,  or  any  other  help  library  ("HELP 
/LIBRary-  filespec"). 

On  initial  entry  into  a  help  library,  the  help  module  is  displayed, 
if  present,  a  list  of  topics,  and,  perhaps,  the  library  set.  At  the 
"Topic?"  prompt,  enter  the  name  of  the  topic  for  which  you  want  help. 
Only  as  many  characters  as  are  needed  to  uniquely  identify  the  topic 
are  required.  If  the  name  is  not  unique,  all  matching  topics  are 
displayed. 

After  the  topic  has  been  displayed  (may  be  more  than  one  screen), 
a  list  of  additional  information  (sub-topics)  may  also  be  shown.  At 
the  prompt,  enter  the  sub-topic  name. 

When  you  have  finished  with  a  level,  press  RETURN  to  go  up  one 
level.  Pressing  RETURN  at  the  "Topic?"  prompt  exits  the  HELP  command. 
At  any  prompt  (even  in  the  middle  of  typing  an  entry,  *Z  (CTRL-Z)  will 
terminate  HELP. 

Enter  a  question  mark  (?)  at  any  time  to  display  the  most  recent 
(sub) topic  again.  The  actual  help  displayed  depends  on  how  you  got  to 
the  current  level.  The  RETURN  key  should  not  be  pressed  with  the  "?", 
since  the  "?"  is  recognized  immediately.  (If  a  help  library  is  entered 
from  a  program  other  than  the  HELP  command,  the  RETURN  is  required 
after  the  "?".) 

If  you  have  forgotten  the  names  of  the  additional  (sub) topics, 
just  enter  something  you  know  is  not  a  (sub) topic  name  (in  most  cases, 
"ZZ"  is  sufficient).  This  will  display  an  error  message  and  show  the 
valid  (sub) topic  names. 

The  up-arrow  key  me-  be  used  to  bring  back  your  most-recent  entry, 
which  may  be  edited  and  resubmitted. 
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***  Sample  Help  Modules  *** 

The  following  are  sample  help  modules  for  a  program,  a  subprogram, 
a  procedure,  general  information;  and  a  HELP  help  module. 


**  A  Program  ** 


The  following  is  a  portion  of  the  help  module  for  the  AUXPRINT 
program. 


1  AUXPRINT  <—  topic 

List  a  file  on  an  auxiliary  printer  (one  attached  to  an 
interactive  terminal) . 


Format: 


Defaults 


AUXPRINT  file-spec  [  /[NO]CC  ] 

[  /[NO] HEADER  ] 

[  / LENGTH* 1  ] 

[  /SKIP-s  ] 

[  /WIDTH-w  ] 


/NOCC 

/NOHEADER 

/LENGTH-66 

/SKIP-0; 

/SKIP  -->  /SKIP- 10 
/WIDTH-80; 

/WIDTH  --> 

/WIDTH-132 


2  Parameter  < —  sub-topic 

file-spec 

Specifies  the  name  of  the  file  to  be  printed. 

If  omitted,  you  will  be  prompted  for  it. 

Defaults:  extender  -  .DAT;  filename  -  FOR002 

2  Qualifiers  < —  sub-topic 

The  qualifiers  may  follow  the  command  name  or  the  file-spec.  If  a 
qualifier  is  specified  more  than  once,  only  the  final  value  is 
retained. 

/CC 

/CC 

/NOCC 

Specifies  whether  the  file  has  carriage  control  in  column  1  of 
each  line. 

Default:  /NOCC  (that  is,  the  file  does  not  have  carriage  control 
in  column  1) 
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/HEADER 

/HEADER 

/NOHEADER 


Determines  whether  the  listing  will  have  a  heading  giving  the 
date  and  file-spec. 

Default:  /NOHEADER 

2  Admin_info  < —  sub-topic 

Language:  VAX/VMS  Fortran  77 

Authors:  Dan  Allen  -  DTRC  Code  189.2 

David  V.  Sommer  -  DTRC  Code  1893.1 

Date  written:  10/81  (da) 


Dates  revised 
03/14/85  -  dvs 
10/22/85  -  dvs 

systems 

03/07/86  -  dvs 


add  qualifiers  /CC  /HEADER  /LENGTH  /SKIP 
shorten  /CC  output  by  1  line 
change  default  to  /NOHEADER 
add  /WIDTH  qualifier 

fix  /CC  processing  when  first  top-of-page 
is  not  first  record 


i 


! 
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**  A  Subprogram  ** 

This  illustrates  a  subprogram  help  module.  We  suggest  that  such  a 
help  have  the  following  sub-topics: 

.  Parameters  (if  the  routine  has  them) 

.  Examples  (at  least  one  example  to  show  how  to  use  the 
routine) 

.  Admin_info  (to  show  the  source  language,  author,  a  brief 
history,  and  anything  else  that  might  be 
appropriate) 

1  JGDATE  < —  topic 

Convert  any  Gregorian  date  to  a  relative  Julian  number  or  vice  versa. 

Usage:  INTEGER  jg,  jd,  gyear,  gmonth,  gday 

e  e  e 

CALL  JGDATE  (jg,  jd,  gyear,  gmonth,  gday) 

The  relative  Julian  number  corresponding  to  a  Gregorian  date  is  the 
number  of  days  since  11/24/-4713  (extrapolating  the  Gregorian  calendar) . 

This  subroutine  is  useful  in  determining  the  elapsed  number  of  days 
between  any  two  calendar  dates.  It  can  also  be  used  to  find  the 
calendar  date  so  many  days  from  any  given  date. 

2  Parameters  < —  sub-topic 

CALL  JGDATE  (jg,  jd,  gyear,  gmonth,  gday) 

jg  -  in  -  int  -  direction  of  conversion 

1  -  Gregorian  to  Relative  Julian 

2  -  Relative  Julian  to  Gregorian 

jg“l:  jd  -  out  -  int  -  will  contain  relative  Julian  number 

gyear  -  in  -  int  -  Gregorian  year  (e.g.,  1985) 

gmonth  -  in  -  int  -  Gregorian  month  (1-12) 

gday  -  in  -  int  -  Gregorian  day  (1-31) 

jg*2:  jd  -  in  -  int  -  relative  Julian  number 

gyear  -  out  -  int  -  will  contain  Gregorian  year  (e.g.,  1985) 
gmonth  -  out  -  int  -  will  contain  Gregorian  month  (1-12) 

gday  -  out  -  int  -  will  contain  Gregorian  day  (1-31) 

2  Examples  < —  sub-topic 

INTEGER  jd,  gy,  gm,  gd 

e  e  e 

CALL  JDDATE  (1,  jd,  1985,  2,  25) 
jd  -  jd  +  1000 

CALL  JGDATE  (2,  jd,  gy,  gm  ,gd) 

This  example  will  find  the  date  1000  days  from  02/25/85. 
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2  Admin_info 

Language:  Fortran  77 

Author:  David  V.  Sooner  -  DTRC  Code  1893.1 

Date  written:  1968  or  earlier 
Dates  revised 

03/01/79  -  implement  on  Burroughs  7700 
02/01/85  -  implement  on  DEC  VAXcluster 


< —  sub-topi 


**  A  Command  Procedure  ** 

The  procedure  FLR  has  the  following  definition  for  all  users: 
$  FLR  :—  <?VSYS:FLR 

Without  this  definition,  the  "Format"  would  have 
@VSYS:FLR  [  filename] 


1  FLR 

Compile  Fortran,  Link  and  Run. 

Format : 

FLR  [  filename  ] 

If  filename  is  omitted,  you  will  be  prompted  for  it. 


< —  topi 


For  execution,  FOR005,  F0R006  and  SYS$INPUT  are  assigned  to  the 
terminal.  Thus,  all  Fortran  READ,  PRINT,  READ  (5,...,  WRITE  (6,..., 
TYPE,  and  ACCEPT  statements  will  read  from  or  write  to  the  terminal. 

Ignore  the  system  message  "previous  value  of  SYS$INPUT  has  been 
superseded". 


) 
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**  General  Information  ** 

The  following  is  a  portion  of  the  help  module  for  a  discussion  of 
the  DTRC  accounting  for  users  with  more  than  one  account.  This  module 
has  no  sub-topics. 

1  Many_ac counts 

VAXcluster  users  with  more  than  one  account  are  assigned  a  username/ 
password  for  each  account.  These  usernames  differ  in  the  fifth 
character  position,  e.g.,  CAWE,  CAWEA,  CAWEB.  The  default  login 
directory  for  each  user  is  device:  [username]  where  all  files  owned  by 
the  same  individual  are  stored  on  the  same  device.  For  example, 

uOl : [came] 

U01: [CAWEA] 

UOl: [CAWEB] 


ACCESSING  FILES  OWNED  BY  YOUR  ALTER  EGO 


The  "usernames"  belonging  to  a  particular  user  are  members  of  a  VMS 
"group".  By  default  on  the  VAXcluster,  members  of  a  group  have  Read 
and  Execute  access  to  all  files  owned  by  their  fellow  group  members. 
User  CAWEA  wishing  to  access  a  file  owned  by  CAWE  simply  references 
[CAWE]file.ext  . 

Of  course,  these  access  rights  can  be  changed  by  the  SET  PROTECTION 
and  SET  FILE  /ACL  commands.  In  addition,  all  members  of  these  special 
"groups"  have  GRPPRV  privilege  which,  when  invoked,  gives  a  member  of 
the  group  full  control,  including  file  creation  and  deletion,  over  all 
files  owned  by  all  members  of  the  group.  GRPPRV  is  invoked  by 

$  SET  PROCess  /PRIVileges-GRPPRV 

(this  would  likely  be  in  your  LOGIN.COM) 

Then  to  "copy"  a  file  from  one  account  to  another,  for  example  CAWE  to 
CAWEA,  user  CAWEA  would 

$  COPY  [CAWE] file. ext  [] 

or  user  CAWE  would 

$  COPY  file. ext  [CAWEA] 

To  simply  "move"  a  file  from  one  account  to  another,  CAWEA  would 

$  RENAME  [CAWE] file. ext  [] 

$  SET  FILE  /OWNer_uic-CAWEA 


Finally,  the  command  HYACcount  will  indicate  the  account  number  of  the 
currant  session  or  job,  while  MYACeount  /ALL  will  provide  a  list  of  all 
user/aeeount  pairs  in  the  group. 
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**  "HELP"  module  ** 

It  is  recoaaended,  though  not  necessary,  that  your  help  library 
have  a  help  module  named  HELP.  Such  a  aodule  will  be  displayed  when 
you  enter  the  library,  and,  therefore,  should  give  a  brief  description 
of  the  library  and,  if  appropriate,  pointers  to  related  libraries. 

The  following  is  the  help  aodule  HELP  for  library  @CCF: 

1  HELP 

The  CCF  help  aodules  provide  information  of  general  interest  to  users 
of  the  DTRC  Central  Coaputing  Facility. 

Other  help  libraries  available  include: 

8COS  -  Cray  Operating  System  JCL 

FCRAY  -  DTRC  additions  to  Cray 

FDTLIB  -  subprograas  in  library  DTLIB  (formerly  NSRDC) 

FUTILITIES  -  utility  programs  and  procedures 


Last  modified:  29-JUN-1988  11:28:21 
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*****  Procedures  ***** 

A  procedure  is  a  group  of  control  stateaents  in  a  file  (default 
file  type  .COM).  Calling  a  procedure  provides  a  simplified  way  to 
process  that  group  of  control  stateaents.  A  procedure  aay  call  another 
procedure. 

Eight  parameters.  Pi  through  P8,  are  available  for  you  (or  another 
procedure)  to  pass  data  or  other  information  to  a  procedure. 

Both  string  and  integer  variables  aay  be  used  in  a  procedure. 
Several  lexical  functions  are  available  to  interrogate  the  systea,  to 
manipulate  variables,  etc.  Files  aay  be  read  or  written.  And,  of 
course,  DCL  stateaents  aay  be  executed. 

For  aore  information,  see  AA-Y501A-TE, 

Coaaand  Procedures  on  VAX/VMS". 


Guide  to  Using  DCL  and 
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*****  Object  Librariea  ***** 

An  object  library  (file  type  .OLB)  contains  compiled  subprograms 
for  use  in  linking  with  a  program. 

The  Librarian  utility  LIBRARY  is  used  to  create,  maintain,  list, 
and  extract  modules  from  an  object  library. 

***  DTRC  Object  Library  *** 

One  object  library  has  been  added  to  VHS  at  DTRC: 

VSYS:DTLIB  -  Subprograms  written  or  maintained  by  the  Computer 
Center 

To  use:  LINK  yourobj .DTIB/LIB 
***  User  Object  Module  *** 

An  object  module  (file  type  .OBJ)  is  a  file  containing  one  or  more 
compiled  subprogram (s) .  They  are  produced  by  compiler  such  as  FORTRAN, 
COBOL,  PASCAL,  etc. 

***  Create  an  Object  Library  *** 

The  LIBRARY  command  is  used  to  create  an  object  library. 

LIBRARY  /CREATE  object_l ibrary_name 
-or- 

LIBRARY  /CREATE* (op ti on, .. .)  object_library_name 

where  object_library_name  is  the  name  of  the  library  to  be  created.  It 
will  have  the  default  filename  object_library_name.OLB. 

The  following  options  may  be  specified: 

BL0CKS:n  The  number  of  512-word  blocks  to  be  allocated, 
(default:  100) 

GL0BALS:n  The  maxima  number  of  global  symbols  the  library  can 
contain. 

(default:  128) 


HISTORY :n 


The  maximum  number  of  library  update  history  records 
to  be  maintained. 

(default:  20) 
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KEYSIZE:n  The  maximum  length  of  nodule  names. 

(default:  15) 

MODULES :n  The  maxinun  number  of  nodules  the  library  can  hold, 
(default:  256) 


***  Modify  an  Object  Library  *** 

The  LIBRARY  conmand  is  used  to  insert,  and  delete  object  library 
nodules.  Wildcards  are  allowed  in  nodule  names. 

LIBRARY  /INSERT  object_library_nane  object_nodule_f xle 

LIBRARY  /REPLACE  object_library_nane  object_module_f ile 

LIBRARY  /DELETE* (nodule [, . . .] )  object_library_name 

'LIBRARY  object_library_nane  object_module_file'  is  the  same  as  if 
'/REPLACE'  were  specified.  If  '/LOG'  is  specified,  a  message  will  be 
displayed  for  each  operation.  (E.g.,  LIBR  /LOG  ...) 

If  object_nodule_f ile  contains  several  object  nodules,  each  will  be 
a  separate  entity  in  the  object  library. 

If  the  qualifier  /N0GL0BALS  is  specified,  the  global  symbols  for  the 
modules  being  inserted  will  not  be  put  into  the  global  synbol  table. 


***  Compress  an  Object  Library  *** 

After  several  inserts,  deletes  or  replaces,  there  nay  be  a  lot  of 
"dead  space"  in  the  library.  To  renove  this,  that  is,  to  compress  the 
library,  use: 

LIBRARY  /COMPRESS  object_library_nane 


-or- 

LIBRARY  /COMPRESS* (option, .. .)  object_library_name 

/LOG  will  list  the  nodules  as  they  are  copied  into  the  compressed 
library. 

In  addition  to  the  options  available  for  /CREATE: 

KEEP  Copy  the  history  records,  etc.,  to  the  compressed 

library. 

(default:  do  not  copy) 


i 

* 
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***  List  the  Contents  of  an  Object  Library  *** 

The  LIBRARY  command  also  lists  the  contents  of  an  object  library. 
The  /LIST  qualifier,  which  may  be  specified  alone  or  with  any  of  the 
above  operations,  will  provide  information  about  the  library  including 
a  list  of  the  modules  in  the  library.  If  /FULL  is  also  specified,  the 
list  of  modules  will  include  the  date  and  timeit  was  inserted  into  the 
library.  If  /HISTORY  is  specified,  it  will  show  who  did  what  to  the 
library  and  when.  The  number  of  history  records  retained  is  defined 
when  the  library  was  created  or  compressed. 

For  a  list  of  the  library  without  other  operations,  use 

LIBRARY  /LIST  -or- 

LIBRARY  /LIST  /FULL  -or- 

LIBRARY  /LIST  /FULL  /HISTORY 

The  list  will  be  displayed  on  SYSSOUTPUT.  To  put  the  listing  into  a 
file,  use  /LIST-f ile~spec. 

If  the  qualifier  /NAMES  is  specified,  the  names  of  all  global 
symbols  will  also  be  listed. 


***  Extract  an  Object  Module  *** 

To  extract  an  object  module  to  make  some  modifications  to  it,  use 

LIBRARY  /EXTRACT- (module [,...]  /OUTPUT-f ile-spec 
object_library_name 

If  /OUTPUT  is  specified,  the  modules  are  put  into  file  <file~spec>.  If 
/OUTPUT  is  omitted,  they  are  put  into  file  object_module_name.OBJ. 


***  Linking  with  an  Object  Library  *** 


If  your  program  uses  subprograms  in  an  object  library,  they  can  be 
linked  using 

LINK  your_obj,  your_lib/LIBrary 

where  your_obj  is  the  object  module  for  your  program 
your__lib  is  your  object  library 

/LIBrary  tells  the  linker  that  your_lib  is  an  object  library 

If  you  are  linking  more  than  one  object  file  or  using  more  than  one 
object  library,  you  might  use  one  of  the  following  forms: 


LINK  objl,  obj2, 
LINK  objl,  ob j 2 , 
LINK  objl,  obj2, 
LINK  objl,  ob j 2 , 


libl/LIB 

libl/LIB,  Iib2/LIB 
libl/LIB,  obj3 
libl/LIB,  ob j 3 ,  Iib3/LIB 


etc. 
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*****  Text  Libraries  ***** 

A  text  library  (file  type  .TLB)  contains  text  aodules,  that  is, 
aodules  containing  source  prograas,  documents,  notes,  data,  etc. 

The  Librarian  utility  LIBRARY  is  used  to  create,  maintain,  list, 
and  extract  aodules  froa  a  text  library. 


The  following 
DTLIB 

DTLIBCRAY 

INCLUDE 

UTILITIES 


***  DTRC  Text  Libraries  *** 
text  libraries  have  been  added  to  VMS  at  DTRC: 

-  Source  code  for  subprograms  in  library 
VSYSjDTLIB.OLB 

-  Source  code  for  subprograms  in  library  DTLIB  on 
Cray 

-  Some  common  block  and  code  segments  to  INCLUDE  in 
a  program  or  subprogram 

-  Source  code  for  programs  which  have  been  added  to 
VSYS: 


***  user  Text  Module  *** 

A  text  module  (default  file  type  .TXT)  is  a  file  containing  a  source 
program,  a  document,  some  miscellaneous  information,  etc. 


***  Create  a  Text  Library  *** 

The  LIBRARY  coaaand  is  used  to  create  a  text  library. 

LIBRARY  /TEXT  /CREATE  text_library_name 
-or- 

LIBRARY  /TEXT  /CREATE- (op ti on, .. .)  text_library_naae 

where  text_library_naae  is  the  naae  of  the  library  to  be  created.  It 
will  have  the  default  filenaae  text_library_naae.TLB. 
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The  following  options  say  be  specified: 

BLOCKS :n  The  nuaber  of  512-word  blocks  to  be  allocated, 
(default:  100) 

HIST0RY:n  The  aaxiaua  nuaber  of  library  update  history  records 
to  be  aaintained. 

(default:  20) 

K£YSIZE:n  The  aaxiaua  length  of  aodule  naaes. 

(default:  15) 

MODULES :n  The  aaxiaua  nuaber  of  aodules  the  library  can  hold, 
(default:  256) 


***  Modify  a  Text  Library  *** 

The  LIBRARY  coaaand  is  used  to  insert,  and  delete  text  library 
aodules. 

LIBRARY  /TEXT  text_library_naae  text_aodule_f ile  /INSERT 

LIBRARY  /TEXT  text_library_naae  text_aodule_f ile  /INSERT 

/MODULE-nodul ename 

LIBRARY  /TEXT  text_library_naae  text_nodule_f ile  /REPLACE 

LIBRARY  /TEXT  text_library_naae  text_aodule_f ile  /REPLACE 

/MODULE-aodule_nane 

LIBRARY  /TEXT  text_library_file  /DELETE- (aodule [,...] ) 

"LIBRARY  /TEXT  text_library_naae  text  aodule_file"  is  the  sane  as  if 
"/REPLACE"  were  specified.  If  "/MODULE-..."  is  oaitted,  the  aodule 
naae  will  be  the  filenaae  without  the  file  type.  If  "/LOG"  is 
specified,  a  aessage  will  be  displayed  for  each  operation.  (E.g., 

LIBR  /TEXT  /LOG  ...) 

Wildcards  are  allowed  in  the  aodule  naaes  when  deleting. 
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***  Compress  a  Text  Library  *** 

After  several  inserts,  deletes  or  replaces,  there  aay  be  a  lot  of 
"dead  space"  in  the  library.  To  reaove  this,  that  is,  to  compress  the 
library,  use: 

LIBRARY  /TEXT  /COMPRESS  text_library_name 


-or- 

LIBRARY  /TEXT  /COMPRESS- (option, .. .)  text_library_name 

/LOG  will  list  the  modules  as  they  are  copied  into  the  compressed 
library. 

The  options  available  are  the  same  as  for  /CREATE. 


***  List  the  Contents  of  a  Text  Library  *** 

The  LIBRARY  command  also  lists  the  contents  of  a  text  library. 

The  /LIST  qualifier,  which  aay  be  specified  alone  or  with  any  of  the 
above  operations,  will  provide  information  about  the  library  including 
a  list  of  the  aodules  in  the  library.  If  /FULL  is  also  specified,  the 
list  of  aodules  will  include  the  date  and  tine  it  was  inserted  into  the 
library.  If  /HISTORY  is  specified,  it  will  show  who  did  what  to  the 
library  and  when.  The  nuaber  of  history  records  retained  is  defined 
when  the  library  was  created  or  eoapressed. 

For  a  list  of  the  library  without  other  operations,  use 

LIBRARY  /TEXT  /LIST  -or- 

LIBRARY  /TEXT  /LIST  /FULL  -or~ 

LIBRARY  /TEXT  /LIST  /FULL  /HISTORY 

The  list  will  be  displayed  on  SYSSOUTPUT.  To  put  the  listing  into  a 
file,  use  /LIST-f ile-spec. 


***  Extract  a  Text  Module  *** 

To  extract  a  text  aodule  to  Bake  soae  aodif i cat  ions  to  it,  use 

LIBRARY  /TEXT  /EXTRACT- (aodule t, ...] )  /OUTPUT-f ile-spec 
t  ex t_l i brary_naae 

If  /OUTPUT  is  specified,  the  aodules  are  put  into  file  <file~spec>.  If 
/OUTPUT  is  oaitted,  they  are  put  into  file  text_library_name.TXT. 

Wildcards  are  allowed  in  the  aodule  naaes. 

( 
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*****  CDC  CYBER  180/860A  —  NOS  ***** 

The  Control  Data  Corporation  (CD C)  CYBER  180  model  860A  has  a 
single  central  processing  unit  (CPU)  and  1600000C  octal  (2,097,120) 
60-bit  words  of  memory,  of  which  400000  octal  is  addressable  by  each 
job. 


The  CPU  has  24  registers  for  operating  on  information:  8  address 
(A),  8  operand  (X)  and  8  increment  (B)  registers.  The  CYBER  860A  has 
a  buffer  of  12  central  memory  (CM)  words  of  instructions,  called  an 
instruction  stack,  and  a  2048-word,  high-speed  cache  memory. 

Peripheral  processors  (PPs)  are  small  computers  (4096  12-bit  words 
of  memory)  which  handle  most  input  and  output  (I/O) .  There  are  20 
normal  and  5  concurrent  PPs  on  the  CYBER  860A. 

There  are  28  normal  and  5  concurrent  I/O  channels.  Most  peripheral 
equipment  interfaces  with  the  central  system  through  the  PPs  via  the 
I/O  channels.  The  printers  and  remote  terminals  interface  with  the 
system  via  CDCnet. 


***  NOS  Version  2.5.3  *** 

The  operating  system  for  the  CDC  CYBER  860A  at  DTRC  is  called  the 
Network  Operating  System,  version  2.5.3  (NOS  2.5  -  level  688)  and 
differs  only  slightly  from  the  standard  NOS  system.  The  interactive 
subsystem  for  teletype-compatible  terminals  is  called  IAP  (interActive 
Facility);  the  subsystem  for  medium-speed  remote  batch  terminals  is 
called  RBF  (Remote  Batch  Facility). 

Permanent  files  (user  programs  and  data  files  retained  for  frequent 
use)  reside  on  model  895  disk  drives  and  the  Mass  Storage  System.  User 
files,  if  not  specifically  requested  on  a  tape,  will  be  assigned  to 
available  disk  areas. 
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***  Accessing  the  CDC  860A  *** 

To  access  the  CDC  CYBER  860A: 

.  dial  (202)  227-4800  < —  this  will  connect  you  with  CDCnet 

.  press  the  RETURN  key  until  it  displays  a  greeting  (usually 
two  times)  —  (CDCnet  has  no  prompt,  but  HELP  is  available) 

.  enter  DO  DEC_VT100  (if  you  are  using  a  DEC  VT100~compatible 

terminal;  this  will  set  half  duplex  (echo 
on)  for  your  session  without  having  to 
change  your  terminal  set-up) 

(another  way  is  to  put  "TRMDEF,EP*tY. "  into 
your  L0GINPR  file  —  this  is  preferred, 
since  you  then  don't  have  to  bother  with 
the  DO  command  each  time  you  log  in) 

.  enter  CREC  NOS  to  connect  to  the  CDC  860A  NOS  system 

.  in  response  to  the  Family:  prompt,  enter  either 
.  , xxxx.pw, IAF  (xxxx  is  your  User  Initials, 
pw  is  your  login  password 
IAF  is  the  InterActive  Facility) 

-or- 

.  RETURN,  then  the  rest  of  the  information  one  item  at  a  time 
as  prompted 

.  in  response  to  the  CHARGE  NUMBER:  prompt,  enter  your  Job 
Order  Number 

.  when  you  receive  the  "/"  prompt,  you  are  in  IAF 

.  if  you  entered  your  Job  Order  Number  incorrectly,  you  must 
enter  "CHARGE, number . "  at  the  "/"  prompt  until  a  valid 
number  is  accepted. 
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***  Terminal  Keys  *** 

NOS  aupport*  screen  formatting  for  most  display  terminals.  Many 
commands  use  a  full-screen  mode  when  the  SCREEN  command  is  used.  When 
these  commands  show  function  keys,  they  are  shown  as  they  appear  on  a 
CDC  Viking  721  terminal.  When  using  other  terminals,  different  keys  or 
sequence  of  keys  may  be  needed  for  the  desired  function. 

The  following  table  shows  the  key(s)  to  be  used  for  some  terminals 
at  DTRC.  The  DT100  keypad  for  use  in  FSE  is  on  page  5-1-5. 


CDC 

Viking  721 


DEC 

VT100 


Tektronix 

T4115 


keypad  1 
+  RETURN 


keypad  2 
+  RETURN 


keypad  3 
+  RETURN 


keypad  4 
+  RETURN 


keypad  5 
+  RETURN 


keypad  6 
+  RETURN 


keypad  7 
+  RETURN 


keypad  8 
+  RETURN 


keypad  9 
+  RETURN 


Ctrl  A 


Ctrl  S 


Ctrl  D 


Ctrl  F 


CDC  DEC 

Viking  721  VT100 


Tektronix 

T4115 


shift  FI 


shift  F2 


shift 


shift 


shift 


shift 


shift 


shift 


shift 


shift 


shift 


shift 


PF1 

+  RETURN 


PF2 

+  RETURN 


PF3 

+  RETURN 


PF4 

+  RETURN 


keypad  - 
+  RETURN 


keypad  , 
+  RETURN 


kp  ENTER 
+  RETURN 


keypad  . 
+  RETURN 


shift  FI 


shift  F2 


shift  F3 


shift  F4 


shift  F5 


shift  F6 


shift  F7 


shift  F8 


Ctrl  Q 


Ctrl  W 


Ctrl  E 


Ctrl  R 
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CDC 

Viking  721 


DEC 

VT100 


Tektronix 

T4115 


F13 


i 


F14 


F15 

F16 


NEXT 


RETURN 


RETURN 


i 

-+- 


HELP 


BACK 


STOP 

Ctrl  T+NEXT 


Ctrl  T  |  Ctrl  T 
+  RETURN  i  +  RETURN 


FWD 


i 


BKW 


UP 


i 

-+- 


DOWN 


-+- 

i 


CDC  DEC  Tektronix 

Viking  721  VT100  T4U5 


shift  F13  j 

I 

I 

- +. 

shift  F14  j 

I 

I 

- +. 

shift  F15  | 

i 

i 

- +. 

shift  F16  | 

! 

- 

i 

i 

i 

i 

- +. 

shift  HELP  | 

I 

I 

- +. 

shift  BACK  ; 

1 

- +. 

shift  STOP  J 

I 

I 

- +. 

shift  FWD  i 

I 

I 

- +. 

shift  BKW  | 

I 

( 

- +. 

shift  UP  J 

i 

i 

- +. 

shift  DOWN  ! 

i 

- +• 

shift  CLEAR1, 

t 

I 


1 

I 

I 

- +. 

1 

I 

1 

- +. 

I 

l 

J 

I 

- +. 

1 

I 

l 

- +. 

1 

( 

I 

I 

- +. 

I 

I 

I 

I 

- +. 

I 

I 

I 

- +. 

Ctrl  T  1 
+  RETURN  | 

- +. 

I 

I 

I 

- 

! 

i 

i 

- +. 

i 

i 

i 

i 

- +. 

i 

i 

i 

- +. 

i 

i 

i 

i 


Ctrl  T 
+  RETURN 
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SCREEN.DT100  before  entering  FSE  put*  you  in  full-screen  node  with 
the  following  definition  of  the  keypad. 


+ - + 

PF4 

del  w 


PF1 
del  b 


PF2 

join 


PF3 
del  c 


8 


ins  b 


split 


ins  c 


ins  w 


nark  c 


love 


del  1 


pos 

ENTER 


nark  1 


copy 


ins  1 


forward 


back 


hone 


After  pressing  one  or  nore  of  the  keypad  keys,  the  RETURN  key  nust  be 
used  to  perforn  the  requested  functions. 

The  arrow  keys  nay  be  used  to  position  the  cursor. 
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***  Direct  versus  Indirect  Files  *** 

Unlike  nost  other  operating  systeas,  NOS  supports  two  distinct 
types  of  file:  direct  and  indirect. 

Disk  space  is  allocated  by  PRU  (physical  record  unit)  with  one  PRU 
holding  64  words  (640  6-bit  or  320  8/12-bit  characters). 

A  direct  file  (not  to  be  confused  with  a  "direct  access"  or  randoa 
file)  occupies  one  or  aore  blocks  of  704  PRUs  and  is  charged  by  the 
nuaber  of  blocks  needed  to  hold  the  file.  (A  705-PRU  file  occupies  2 
blocks.)  When  you  ATTACH  a  direct  file,  you  are  working  with  the 
actual  file.  Changes  aade  by  a  prograa  immediately  change  the  actual 
file  and  cannot  be  "undone".  Changes  made  while  editing  alter  the 
file  with  you  QUIT  FSE.  To  "undo"  the  changes  before  QUITting,  enter 
"SET  FILE  dummy"  (SF  dummy)  and  the  changes  will  be  aade  to  local  file 
"dumay". 

An  indirect  file  occupies  up  to  696  PRUs  and  is  charged  by  the 
nuaber  of  PRUs  needed  to  hold  the  file.  (A  1-PRU  indirect  file 
occupies  1  PRU,  while  a  1-PRU  direct  file  occupies  1  block,  or  704 
PRUs.)  When  you  GET  an  indirect  file,  you  are  working  with  a  copy  of 
the  file.  Any  changes  made  by  editing  or  by  a  program  affect  only  the 
copy  and  may  be  "undone"  any  time  prior  to  REPLACE-ing  the  file.  An 
indirect  file  is  actually  a  portion  of  a  larger  "file"  containing  other 
indirect  files.  You  cannot  work  with  the  actual  file  because  a  change 
could  lengthen  it,  thus  destroying  the  file  which  physically  follows 
it.  When  you  REPLACE  an  indirect  file,  the  new  file  is  put  wherever 
there  is  room  in  the  larger  "file".  Notice  that  the  largest  indirect 
file  fits  within  one  block. 

Direct  files  are  required  for  files  larger  than  696  PRUs  and  for 
files  which  require  that  changes  be  made  in  real  time,  perhaps  for  other 
users  of  the  file. 

Indirect  files  are  recommended  for  short  files.  They  are 
especially  useful  for  source  programs  and  data  files  which  are  under 
development,  where  you  might  want  to  try  some  changes  but  not  make  them 
permanent  until  you  decide.  The  largest  indirect  file  actually  holds  a 
lot  of  information  (445,440  6~bit,  222,720  8/12-bit  characters).  For 
example,  the  CDC  750  NOS/BE  public  procedure  file  had  some  157 
procedures,  some  of  then  quite  elaborate,  and  occupied  684  PRUs. 
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*****  N0S  CCL  eoaaands  ***** 

The  NOS  CYBER  Control  Language  (CCL)  statements  are  grouped  by 
function  in  this  section.  See  Appendix  D  for  a  description  of  the 
syntax  for  each  coaaand.  (DTRC)  indicates  a  coaaand  or  prograa  added 
at  DTRC. 

***  Flow  Control  *** 

BEGIN  Transfer  control  to  a  procedure. 

DISPLAY  Evaluate  an  expression  and  put  the  result  into  the  job's 
dayfile  in  octal  and  deciaal. 

ELSE  Terainate  skipping  (false  IF  coaaand  with  same  label) ,  or 

initiate  skipping  (true  IF  coaaand  with  saae  label)  to  ENDIF 
with  saae  label. 

ENDIF  Terainate  skipping  by  a  SKIP,  IF,  or  ELSE  coaaand  with  a 
aatching  label. 

ENDN  The  end  of  a  WHILE  loop. 

EXIT  Resune  processing  eoaaands  after  a  previous  error. 

IF  Conditionally  skip  one  or  aore  eoaaands. 

naae  Transfer  control  to  a  procedure. 

NOEXIT  Continue  processing  with  the  next  coaaano  even  if  an  error  has 
occurred  (suppress  EXIT  processing) . 

ONEXIT  Reverse  the  effect  of  NOEXIT. 

REVERT  Return  froa  a  procedure. 

SET  Assign  a  value  to  a  control  register,  an  error  flag,  or  the 

enter-skipped-coasunds-in-the-dayf ile  flag. 

SKIP  Unconditionally  skip  succeeding  eoaaands,  ending  with  an  ENDIF 
with  a  aatching  label. 

WHILE  Start  of  a  coaaand  loop. 

***  Job  Control  *** 

*  Entire  line  is  a  coaaont. 

BLOCK  Add  one  or  aore  lines  of  10x10  block  letters  to  a  file. 

CHARGE  Validate  charging  inforaation  for  the  job. 
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COMMENT  Place  a  comment  in  the  system  dayfile  and  the  dayfile  for  any 
of  your  jobs. 

CSUBMIT  Subnit  a  job  to  a  Cray  mainfrane. 

CTIME  Put  the  accumulated  CPU  tine  (in  aeconda)  into  the  job's 
dayfile. 

DAYFILE  Write  the  job's  dayfile  to  a  file. 

DROP  Drop  any  of  your  executing  or  queued  files  (except  the  job 
issuing  the  DROP  command) . 

ENQUIRE  Get  information  about  your  jobs. 

ENTER  Enter  a  series  of  commands  on  one  line. 

ERRMSG  Control  the  display  of  error  messages  in  a  procedure. 

GO  Clear  the  pause  bit  of  one  of  your  jobs. 

job  Identifies  requirements  for  a  batch  job. 

LENGTH  Gives  the  current  status  of  one  of  your  local  files. 

LIMITS  List  your  validation  limits. 

LISTLID  List  network  configuration  and  host  availability  information. 
MFL  Reset  maximum  field  length  for  subsequent  job  steps. 

NORERUN  Clear  the  job  rerun  status. 

NOTE  Create  a  file  with  the  command  line  containing  the  lines  for 
the  new  file. 

OFFSW  Clear  sense  switches. 

ONSW  Set  sense  switches. 

PASSWOR  Change  your  password. 

PAUSE  Set  the  pause  bit  of  one  of  your  executing  jobs. 

QGET  Assign  a  queued  file  to  your  job. 

RERUN  Allow  a  job  to  be  rerun  if  necessary. 

RESOURC  Specify  that  more  than  one  tape  drive  is  required. 

RFL  Set  running  field  length. 

RTIME  Put  the  real-time  clock  time  into  the  dayfile. 

SETASL  Set  the  SRU  limit  for  an  accounting  block. 
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SETCORE 

SET JOB 

SETJSL 

SETPR 

SETTL 

STIME 

SUBMIT 

SWITCH 

UPROC 

USER 


ASCII 

CSET 

LINE 

NORMAL 

SCREEN 

TDU 

TRMDEF 

21 

22 

2HELP 


Preset  each  word  of  the  field  length  except  for  RA+2. 

Change  some  of  the  current  job 'a  attributes. 

Set  the  SRU  limit  for  each  subsequent  job  step. 

Decrease  the  CPU  priority  of  a  job. 

Set  the  CPU  time  limit  for  each  subsequent  job  step. 

Put  the  accumulated  SRU  value  for  the  job  into  the  dayfile. 

Put  a  job  into  the  input  queue. 

Set  sense  switches. 

Specify  a  user  prologue  to  be  executed  each  tine  you  start  a 
job. 

Identify  you  and  provide  validation  information  for  each  batch 
job. 


***  Interactive  *** 

**  Terminal  Control  ** 

Set  terminal  to  ASCII. 

Change  the  terminal's  character  set  mode. 

Set  your  terminal  for  line  (or  scrolling)  mode  for  FSE  and 
HELPME. 

Reverse  the  effect  of  ASCII,  AUTO,  BRIEF,  and  CSET, ASCII 
commands . 

Set  your  terminal  for  screen  mode. 

Compile  a  terminal  definition  file  and  store  it  in  a  user 
library  which  can  later  be  accessed  by  a  SCREEN  or  LINE 
command. 

Change  terminal  characteristics. 

Interrupt  current  job  step. 

Terminate  current  job  step. 

Display  the  CDCnet  command  list. 
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ACCESS 

BASIC 

BATCH 

EXECUTE 

FORTRAN 

NULL 


ZD 

ZE 

ZS 


APPSW 

BYE 

DIAL 

EXPLAIN 

GOODBYE 

HELLO 

HELP 

HELPBE 

HELPME 

LIST 

LOGIN 

LOGOUT 

RECOVER 

i 

|  j 


**  Subsystea  Selection  ** 

Select  the  ACCESS  subsystea. 

Select  the  BASIC  subsystem. 

Select  the  BATCH  subsystea. 

Select  the  EXECUTE  subsystem. 

Select  the  FORTRAN  subsystea. 

Select  the  NULL  subsystem. 

**  Interactive  Status  ** 

Immediately  detach  a  terminal  job  from  the  terminal. 
Immediate  detailed  job  status. 

Immediate  abbreviated  job  status. 

**  Job  Processing  ** 

Switch  temporarily  to  an  alternate  NAM  application  program. 
Terminate  an  application. 

Send  a  one-line  message  to  another  user. 

Retrieve  an  on-line  version  of  a  CDC  manual. 

Terminate  an  application. 

Logs  you  out  of  IAF  and  switches  you  to  another  application, 
or  starts  another  login. 

Ask  for  help. 

On-line  help  for  the  NOS-equi valent  of  NOS/BE  commands. 

Display  a  brief  description  of  a  command,  prosit  for 
parameters,  execute  the  command. 

List  lines  of  a  local  file. 

Terminate  your  current  application  and  start  another. 
Terminate  an  application. 

Recover  a  detached  job  or  interrupted  terminal  session. 
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REDO  Modify  and  re-execute  a  previously  entered  conand  without 
having  to  retype  the  entire  command. 

SHOW  Display  a  screen  formatting  panel  for  testing  purposes. 

WHATJSN  Get  the  job  sequence  number  for  the  specified  user  name. 

X  Execute  a  batch  command. 

XMODEM  Transfer  a  file  between  NOS  and  a  PC  using  the  Christensen 
protocol . 

***  File  Management  *** 

ASSIGN  Assign  a  file  to  a  device. 

BKSP  Backspace  a  file  (by  logical  records). 

CLEAR  Release  all  (or  all  but  one  or  more  specified)  auto-drop  files 
assigned  to  the  job. 

COPY  Copy  data  from  one  file  to  another. 

COPYBF  Copy  a  multi-file  file. 

COPYBR  Copy  a  records  from  one  file  to  another. 

COPYCF  Copy  a  coded  multi-file  file. 

COPYCR  Copy  a  records  from  one  coded  file  to  another. 

COPYEI  Copy  a  file  through  end-of-information. 

COPYSBF  Copy  a  file,  shifting  the  lines  one  character  to  the  right  for 
printing  on  a  printer. 

COPYX  Copy  a  file  until  a  user-specified  condition  is  met. 

PCOPY  Convert  a  file  from  one  character  set  to  another. 

FILE  (CRM)  Describe  the  attributes  of  a  file. 

L072  Reformat  files. 

LOCK  Prevent  writing  on  a  local  file. 

OUT  Send  deferred  output  files  to  the  print  or  punch  queue 

immediately. 

OV WRITE  Overwrite  files  to  destroy  their  contents. 

PACK  Remove  all  EORs  and  EOFs  from  a  file. 

RENAME  Change  the  name  of  a  local  file. 
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REQUEST  Assign  a  file  to  receive  checkpoint  dumps,  or  send  a  message 
to  the  operator  to  assign  to  the  described  device. 

RETURN  Release  files  (and  file  space  depending  on  file  type)  assigned 
to  a  job. 

REWIND  Position  files  at  beginning-of-inf oraation  (BOI) . 

ROUTE  Direct  the  disposition  of  an  indirect  file  and  define  its 
characteristics. 

SCOPY  Copy  coded  file(s)  displaying  EORs  and  EOFs  in  the  receiving 
file. 

SETFS  Set  the  auto-drop/no-auto-drop  status  of  files  assigned  to 
your  job. 

SKIPEI  Position  a  file  at  end~of~inforaation. 

SKIPF  Skip  forward  a  specified  nuaber  of  files. 

SKIPFB  Skip  backward  a  specified  nuaber  of  files. 

SKIPR  Skip  forward  a  specified  nuaber  of  record  or  file  aarks. 

TCOPY  Copy  X  (binary),  E,  B,  or  SI  files  to  disk,  I,  or  SI  (binary) 

tape. 

TDUMP  Octal  or  alphanumeric  duap  of  all  or  part  of  a  file. 

UNLOAD  Release  files  assigned  to  your  job  and  perhaps  their  file 

space. 

UNLOCK  Rescind  the  LOCK  coaaand  and  clear  the  write  interlock  for 
specified  local  disk  files. 

VERIFY  Binary  file  coaparison. 

WRITEF  Write  a  specified  nuaber  of  file  aarks  on  a  file. 

WRITER  Write  a  specified  nuaber  of  eapty  records  on  a  file. 

***  Permanent  File  *** 

APPEND  Append  information  to  the  end  of  an  indirect  access  file 
without  retrieving  the  file. 

ASSIGN  Assign  a  file  to  a  device. 

ATTACH  Assign  a  direct  access  peraanent  file  to  a  job. 

CATLIST  List  peraanent  file  information. 
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CHANGE  Change  soae  characteristic*  of  a  permanent  file. 

DEFINE  Create  an  enpty  direct  access  permanent  file. 

GET  Get  copies  of  indirect  access  permanent  files  as  local  files. 

PERMIT  Explicitly  permit  another  user  to  access  one  of  your  private 
files. 

PUR GALL  Purge  all  your  files  which  match  the  parameters. 

PURGE  Purge  one  or  more  direct  or  indirect  permanent  files. 

RECLAIM  Selectively  backup  and  reload  local  and  permanent  files. 

REPLACE  Purge  an  indirect  access  file  and  replace  it  with  a  copy  of  a 

local  file;  save  a  copy  of  a  local  file  as  a  new  indirect 
access  file. 

SAVE  Put  a  copy  of  a  local  file  on  disk  as  an  indirect  access  file. 

***  Load/Dump  Memory  *** 

DMB  Binary  dump  of  exchange  package  and  central  memory. 

DHD  Dump  the  exchange  package  or  central  memory  in  both  octal  and 

display  cod*. 

DMP  Dump  the  exchange  package  or  central  memory  in  octal. 

***  Tape  Management  *** 

ASSIGN  Assign  a  file  to  a  device. 

BLANK  Blank  label  a  magnetic  tape. 

LABEL  Mount  a  magnetic  tape  and,  if  labelled,  check  the  label. 

LISTLB  List  labels  of  an  ANSI-labelled  tape. 

REQUEST  Assign  a  file  to  receive  checkpoint  dumps,  or  send  a  message 
to  the  operator  to  assign  to  the  described  device. 

REQUEST  Request  a  tape  be  mounted  (LABEL  is  preferred) . 

VSN  Associate  a  local  file  name  with  on*  or  more  volume  serial 

numbers . 

***  Checkpoint /Res tart  *** 

CKP  Take  a  checkpoint  dump. 

RESTART  Restart  a  checkpointed  job. 
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BEGIN 

REVERT 

FSE 

UPDATE 

CATALOG 

COPYL 

COPYLM 

GTR 

ITEMIZE 

LIBEDIT 

LIBGEN 

LIBRARY 

ULIB 

VFYLIB 

C0B0L5 
PTN5 
X, BASIC 


***  Procedures  *** 

Transfer  control  to  a  procedure. 

Return  froa  a  procedure. 

***  Systea  Utilities  *** 

Invoke  the  full  screen  editor. 

Create,  edit  or  copy  an  Update-f oraatted  program  library. 

***  Library  Maintenance  *** 

List  information  about  each  record  in  a  file. 

Selective  single  replacement  of  object  modules. 

Selective  aultiple  replaceaent  of  object  aodules. 

Selective  extraction  of  records  froa  a  file. 

List  information  about  each  record  of  a  binary  file. 

Create  and  aaintain  a  library  of  programs,  subprograms, 
procedures,  or  text. 

Create  a  new  user  library  of  routines  for  use  by  the  loader. 

(Loader)  Specify  a  set  of  global  libraries  to  be  searched  for 
externals  and  programs  and  the  order  in  which  they  are  to  be 
considered. 

Create  a  user  library;  add,  delete  or  replace  a  record. 

List  differences  in  name,  type,  length,  and  checksum  for  the 
records  of  two  files. 


***  Programing  Languages  *** 

Compile  COBOL  74  program. 

Compile  Fortran  77  program. 

Compile  a  BASIC  program  without  changing  to  the  BASIC 

subsystem. 
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***  Loader  and  Loader-related  Control  Statements  *** 

EXECUTE  Complete  loading,  fill  unsatisfied  references  by  system  (and 
user)  library  search,  generate  load  map  and  execute  the 
program. 

LDSET  Set  any  of  several  loader  options  for  the  current  load  only. 

LGO  Load  and  execute  the  default  compiler  binary  output  file. 

LIBLOAD  Load  modules  from  specified  library  which  contains  the 
specified  entry  points. 

LIBRARY  Specify  a  set  of  global  libraries  to  be  searched  for  externals 
and  programs  and  the  order  in  which  the  libraries  are  to  be 
searched. 

LOAD  A  list  of  files  whose  contents  are  to  be  loaded. 

HAP  Specify  the  global  default  option  for  load  maps. 

name  Load  and  execute  binary  program  or  procedure  in  local  file 
<name>. 

NOGO  Complete  the  loading  of  a  program,  including  generating  load 
map,  but  do  not  execute. 

REDUCE  Turn  the  reduce  flag  on  or  off. 

RFL  Set  running  field  length. 

SATISFY  Satisfy  unsatisfied  externals  prior  to  normal  satisfaction  at 
load  completion. 

SLOAD  Selectively  load  modules  from  local  file  <lfn>. 
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*****  Procedures  ***** 

A  procedure  is  a  group  of  control  stateaents  separate  froa  the  job 
control  stateaent  file.  Calling  a  procedure  provides  a  simplified  way 
to  process  that  group  of  control  stateaents.  A  procedure  may  be  called 
by  a  job  repeatedly,  by  another  procedure,  or  by  itself. 

In  general,  the  "CCL  CYBER  Control  Language  Reference  Guide"  for 
NOS/BE  can  be  used  for  NOS.  It  is  available  froa  User  Services.  See 
also  NOS  2  Reference  Set  Voluae  3:  System  for  additional  features. 


***  Procedure  Directives  *** 

Procedure  directives  allow  you  to  control  procedure  processing 
options.  The  procedure  "title",  the  help  text,  and  all  "text"  and 
"aessage"s  may  be  in  6/12-bit  upper  and  lower  case. 


.CC(n)  Specify  the  concatenation  character  for  a  procedure. 

.CORRECT, text. 

.CORRECT-text. 

Specify  the  prompt  to  follow  an  incorrect  procedure  parameter 
entry  for  an  interactive  procedure. 


.  DATA, If n. 

Create  a  local  file  froa  a  procedure. 

.DATA  is  terminated  by  another  .DATA,  an  end-of-record  (not 
.EOR),  an  end-of-file  (not  .EOF),  or  end-of-inforaation. 

.IF,  .ELSE,  .ENDIF  can  be  used  within  the  data  lines  for 
conditional  inclusion. 

.ELSE, label. 

End  skipping  by  a  Batching  .IF  or  start  skipping  to  a  matching 
.ENDIF  in  a  procedure. 


.ENDHELP. 

Hark  the  end  of  the  help  section  of  an  interactive  procedure. 
.ENDIF, label. 

End  skipping  from  a  matching  .IF  or  .ELSE  in  a  procedure. 
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.ENTER .text. 

.ENTER-text. 

Specify  the  prompt  for  before  an  interactive  procedure 
parameter  entry. 

.EOF.  Put  an  end-of-file  into  a  file  created  by  .DATA  in  a  procedure 
or  in  the  procedure  command  record. 

.EOR.  Put  an  end-of-record  into  a  file  created  by  .DATA  in  a 
procedure  or  in  the  procedure  command  record. 


.EX. command. 

Submit  a  command  to  the  ayetem  for  immediate  execution. 
.EXPAND, option 

End  or  resume  procedure  expansion. 

.Fn, text. 

.Fn-text. 

Specify  a  label  for  one  of  the  six  programmable  function  keys 
for  use  with  screen  mode  parameter  displays  in  an  interactive 
or  menu  procedure. 

On  a  VT-100,  these  correspond  to  keypad  keys  1-6. 


.HELP. 

.HELP, NOLIST. 

.HELP,parm. 

. HELP, parm, NOLIST. 

Specify  the  help  (upper  and  lower  case)  text  for  a  procedure 
or  parameter. 


.  IC  (n) 

Specify  the  inhibit  character  for  a  procedure. 

.IF, expression. command.  < —  note  2  terminators 
.IF, expression, label.  < —  only  1  terminator 
Conditional  expansion  of  a  procedure. 


.NOCLR, message. 

. NOCLR -message . 

Inhibit  automatic  screen  clearing  during  a  procedure. 

.NOTE, message. 

.NOTE~message. 

Specify  a  message  to  be  displayed  on  the  screen  and  in  your 
dayfile  at  the  end  of  a  procedure  call  (when  all  required 
parameters  are  supplied). 

Use  the  NOTE  command  to  display  comments  during  the  execution 
of  a  procedure. 


.PAGE, text. 

.PAGE-text. 

Specify  the  string  to  precede  the  page  number  on  the  screen. 
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PR0C,pnaae*I"title",pl,p2, . . .  ,pn.ck.  < —  interactive 

PROC,pnaae*M"title”,keyword-(selections) .ck.  < —  aenu 

PROC, pneae.pl ,p2, ... ,pn.  < —  passive 

The  procedure  header  specifying  the  procedure  naae  and 
parameters,  and  enabling  paraaeter  prompting. 

-  the  naae  of  the  procedure 
(1-7  alphanuaerics,  first  should  be 
alphabetic;  append  *1  for 
interactive,  *M  for  aenu-driven; 
nothing  for  passive) 

-  the  procedure  title 
(default:  pnaae) 

-  up  to  50  parameters ,  each  of  the 
fora: 

Interactive: 

keyword"descript ion"- (checklist) 
keyword' description'- (checklist) 
Passive: 
keyword 
keyword- 
keyword-def aul t 1 
keyword-def aul tl/default2 
keyword-/ def aul t2 
keyword-#DATA 
keyword-#FILE 

-  1-10  alphanuaeric 
characters 

-  paraaeter  proapt 
(see  title  above) 

-  a  list  of  acceptable 
values  and  the 
paraaeter  syntax 

-  1-40  chars  if  pi 
is  oaitted 

-  1-40  chars  if  pi  is 
specified  without 
value  or  with  the 
value  pi 

-  the  naae  of  an 
unnaaed  .DATA  file 

-  the  file  containing 

pnaae 

selections  -  the  aenu  selections  in  the  fora: 

nl"descl",n2"desc2", . . . ,nn"descn" 
where  ni  -  integer  (1-10  digits) 
identifying  the  aenu 
selection 

desci  -  the  aenu  itea  descrip¬ 
tion  (see  title  above) 

-  coaaent  keyword  (1-10  characters) 


keyword 

description 

checklist 

defaultl 

default2 

#DATA 

#FILE 


Paraaeters:  pnaae 

title 

pi 


ck 
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.  PROMPT, taxt. 

.PROMPT- text. 

Specify  the  text  for  the  general  request  for  input  in  a 
procedure. 

•SET,keywd_l*strexp_l, . . . ,keywd_n«strexp_n. 

Build  new  procedure  parameters. 


. * coament 

A  coaaent  in  a  procedure. 

Exaaple:  .PROC.ayproc, . . . . 

•  *  * 

REVERT. . . ayproc 
_  * 

.*  created  88/04/12 

.  *  last  modified  88/05/20  (add  "PW"  parameter) 
* 

. *  End  of  ayproc 


***  DTRC  Procedure  Library  *** 

Public-access  procedure  library  PROCFIL  has  been  added  to  NOS  at 
DTRC  and  will  be  searched  if  you  do  not  have  a  local  or  permanent  file 
named  PROCFIL. 


88/10/01 


RevO 


Page  5-3-5 


***  Saaple  Procedure  *** 

The  following  illustrates  a  simple  interactive  procedure  to  compile 
a  Fortran  program  and,  optionally  execute  the  program. 

. PROC , F5*I , I ’ Input ' - (*F , *N- INPUT) , 

B' Binaries '-(*F,*N-LG0) , 

L ' Output '-(*F, *N-0UTPUT) , 

L0*  List  options  *  * (*n“0, 0,0, R, A, M,S) , 

GO ' Execute '-(*N-). 

FTN5,#I-I,#B-B,#L-L,#L0»L0. 

IF,$GO$.NE.$$.LGO. 

REVERT... F5 

Invoking  this  procedure  with 
f5,? 

causes  the  following  dialog: 

PARAMETERS  FOR  F5  ARE  I,  B,  L,  L0,  GO 
Input?  test 
Binaries?  bfile 

Output?  <press  the  RETURN  key  for  the  default> 

List  options?  s 
Execute?  y 

The  generated  FTN5  statement  will  be: 

FTN5 , I-TEST , B-BFILE , L-OUTPUT , LO-S . 

Since  GO  is  non-null,  "LGO."  will  also  be  executed. 
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*****  Prograa  Libraries  ***** 

Source  progress  and  data  say  be  in  separate  datasets  or  say  be 
stored  and  saintained  in  prograa  libraries.  UPDATE  creates  and 
saintains  these  libraries,  which  say  be  display  code  or  ASCII  (8/12). 


***  UPDATE  *** 

UPDATE  is  a  prograa  for  creating  and  aodifying  a  prograa  library 
(PL).  In  addition,  UPDATE  will  extract  individual  aodules  for  input  to 
a  coapiler  or  other  prograa. 

By  default,  72  coluans  of  inforaation  are  retained.  Fifteen 
additional  characters  are  retained  for  each  line:  an  9-character 
identifier,  a  6-digit  sequence  nuaber,  i.e.,  id_seq,  and  is  often 
referenced  as  id.seq. 

UPDATE  supports  two  kinds  of  text  aodules  or  decks: 

-  a  regular  deck  (beginning  with  a  DECK  directive) 

-  a  coaaon  deck  (beginning  with  a  COMDECK  directive)  which  say  be 
included  in  decks  with  a  CALL  directive 

Each  type  includes  all  lines  following  the  deck  directive  until  the 
next  deck  or  aodification  directive. 

History  inforaation  is  retained  allowing  the  deletion, 
aodification,  or  restoration  of  previous  aodifi cat ions. 

See  Appendix  D  for  a  description  of  the  UPDATE  control  stateaent 

paraaeters. 


***  UPDATE  Directives  *** 

An  UPDATE  directive  has  the  following  foraat: 
a  direct ive_naae  [  paraaeters  ] 

where  a  is  the  aaster  character  (default:  asterisk  (*)).  There  are 
five  categories  of  directives. 

**  DECK  and  COMDECK  ** 


*DECK  deck  (*DK) 

First  line  of  a  new  deck.  <deek>  is  up  to  9  characters 
except  coaaa,  period,  blank,  colon,  equals. 

*C0MDECK  cadk  (*CDK) 

First  line  of  a  new  coaaon  deck. 
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**  Compile  File  ** 


*CALL  cmdk  (*CA) 

Include  the  contents  o£  a  common  deck. 

♦COMPILE  pl,p2, . . . ,pj .pk, . . . ,pn  (*C) 

Write  one  or  more  decks,  including  a  range  (pj.pk),  to  the 
compile  and/or  source  datasets.  Use  UPDATE, R  to  force  the 
output  order. 

*CWE0F  (*CW) 

Write  an  EOF  on  the  compile  dataset  if  anything  was 
written  since  the  last  EOF. 

*WE0F  (*W) 

Write  an  EOF  on  the  compile  dataset. 

♦WIDTH  linelen, idlen  (*WI) 

Change  the  data  and  id  length  (default:  72,4). 

*DO,  *DONT,  *IF,  and  *ENDIF  are  also  available. 


**  Modification  ** 

*ADDFILE  lfn.name  (*AF) 

Read  creation  directives  and  text  from  file  lfn  and  insert 
after  the  specified  deck  or  line. 

*BEF0RE  id.seq  (*B) 

Insert  before  a  line. 

♦CHANGE  oldid.newid . oldid,newid 

Change  correction  set  identifier. 

*C0PY  dk, idl.seql, id2.seq2  (*CY) 

Copy  a  range  of  lines  from  deck  or  comdeck  <dk>. 


♦DELETE  idl.seql 

(*D) 

< —  one  line 

♦DELETE  idl.seql, id2.seq2 

< —  a  range  of  lines 

♦DELETE  idl.seql, .seq2 

< —  same  (short  form) 

Delete  a  line  or  a  range  of  lines. 


♦IDENT  ident  (*ID) 

♦IDENT  ident ,B*num,K*id,U»id 

Identify  a  set  of  modifications.  You  can  specify  a 
sequence  number  bias,  and  require  that  other  modification 
sets  be  known  (K“)  or  unknown  (U“) . 

* INSERT  id.seq  (*I) 

Insert  after  a  line. 

♦MOVE  dkl,dk2  (*M) 

Move  deck  <dkl>  to  follow  deck  <dk2>. 

♦PURDECK  dk,dk2 . dkj .dkk . dkn  (*PD) 
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Permanently  reaove  decks. 

♦PURGE  idl , id2, . . . , idj . idk, . . . , idn  (*P) 

Reaove  the  effect  of  a  aodification  set  (idi),  a  range  of 
datasets  (idj. idk),  or  a  set  and  all  following  (idn-*) . 

♦RESTORE  idl.seql  (*R)  <--  one  line 

♦RESTORE  idl.seql,id2.seq2  < —  a  range  of  lines 

Restore  a  line  or  a  range  of  lines. 

♦SEQUENCE  idl, id2, . . . , idj . idk, . . . , idn. .  (*S) 

Resequence  active  lines  and  purge  inactive  lines  in  the 
specified  decks. 

♦YANK  idl, id2, . . . , idj . idk, . . . , idn 

Teaporarily  delete  a  deck,  coadeck,  or  aodification  set 
previously  yanked. 

♦YANKDECK  dk 1 , dk2 , . . . , dk j . dkk , . . . , dkn 

Teaporarily  deactivate  decks. 

♦SELPURGE,  and  *SELYANK  are  also  available. 


**  File  Manipulation  ♦♦ 


♦COPY  naae,idl.seql,id2.seq2,lfn  (*CY) 

Copy  a  range  of  lines  froa  deck  or  coadeck  <naae>  to  file 
<lfn>. 

♦READ  lfn  (*RD) 

Read  input  froa  another  file. 

♦REWIND  lfn 

Rewind  a  file. 

♦SKIPF  lfn.n 

Skip  record(s)  in  a  local  file. 


**  Input  Streaa  Directives  ♦* 

♦abbrev 

Resume  recognition  of  abbreviations. 

♦ENDTEXT  (*ET) 

End  a  *TEXT  section. 

♦LIST  (*L) 

Resume  listing  input  lines.  UPDATE , L-0  overrides  *LIST. 

♦NOABBREV  (*NA) 

Do  not  cheek  for  abbreviation. 


♦NOLIST 


(*NL) 
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Stop  listing  input  lines. 

*TEXT  (*T) 

Treat  all  stateaents  between  *TEXT  and  *ENDTEXT  as  text. 
*SKIP  and  *£NDSKIP  are  also  available. 


**  Special  ** 

*LIMIT  n  (*LT) 

Limit  the  output  listing  to  n  lines. 

*/ comment 

A  comment  line. 


*DECLARE,  *DEFINE,  and  *PULLM0D  are  also  available. 
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***  Examples  *** 


1)  Create  a  PL: 

j  obnaal , . . . . 

USER, user, pw. 

CHARGE , .... 

UPDATE, P-0, C-0.  <—  no  OLDPL  or  COMPILE 

SAVE,NEWPL-aypl .  < —  create  indirect  file 

<eor> 

*DECK  DECK1 

lines  for  deck  DECK1 

*DK  DECR2 

lines  for  deck  DECK2 
*DK  DECK3 

lines  for  deck  DECK3 


2)  Interactively  extract,  coapile  and  execute  deck  DECK2  froa  PL  MYPL 

GET.OLDPL-aypl .  < —  get  indirect  file 

NOTE ,  u in .  /*COMP I LE  deck2 
UPDATE, I-uin. 

FTN5.I. 

LGO. 


3)  Create  a  PL  using  a  coaaon  deck,  coapile  and  execute: 

j  obnaa3 , • . • • 

USER, us or, pw. 

CHARGE, . • . • 

PURGE, aypl/NA. 

DEFINE, NEWPL-aypl.  <—  direct  file 

UPDATE, P-0.  <—  no  OLDPL 

FTN5.I. 

LGO. 

<eor> 

*COMDECK  COM3 

coaaon  /  ay con  /  a,  b 
real  a,  b 
*DK  PROG3 

prograa  prog3 
*CALL  COM3 

call  sub 

print  *,  'a,b-',  a,  b 
end 

♦DECK  SUB 

subroutine  sub 
*CA  COM3 

a  -  1. 
b  -  2. 
return 
end 


<eoi> 
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4)  Update  old  source  library  to  new,  coapile  all  deck*  and  execute: 


j  obnan4 . 

USER, user, pw. 

CHARGE, .... 

GET.OLDPL^aypl .  < —  get  indirect  old  library 

UPDATE, F,N. 

FTH5 , I . 

LGO. 


REPLACE, NEWPL“aypl.  < —  replace  indirect  old  library 

<eor> 

*IDENT  DS0620  < —  correction  nust  be  unique  (initials, date) 

♦INSERT  ALONE. 57  < —  correct  deck  ALONE  by  insert  after  line  57 

(Fortran  statements) 

♦DELETE  FOUR. 12, 13  <—  correct  deck  FOUR  replacing  lines  12-13 

(new  lines  to  replace  deletions  -  optional) 

<eor> 

(data  lines,  if  any) 

<toi> 


5)  Select  routines  froa  source  subroutine  library  and  coapile  with  your 
own  prograa: 

j  obnaa5 ..... 

USER, user, pw. 

CHARGE, .... 

FTN5.  < —  coapile  your  own  programs 

ATTACH , that p 1 /UN-NS YS . 

UPDATE, P-thatpl,Q,L-0. 

FTN5.I. 

LGO. 

<eor> 

(own  Fortran  decks) 

<eor> 

*C  rtnl,rtn6.rtn8  < —  select  decks  RTN1,  6,  7,  8  froa  library 

<eor> 

(data  records,  if  any) 

<eoi> 
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*****  Object  Libraries  ***** 

LIBEDIT  and  LIBGEN  are  utilities  for  creating  and  maintaining 
libraries  of  absolute  and  relocatable  object  nodules.  These  libraries 
can  then  be  used  by  the  loader  to  locate  the  prograa  to  execute  or  the 
subprograas  to  be  loaded  with  your  prograa. 

See  Appendix  B  for  the  LIBEDIT  and  LIBGEN  control  statements. 


***  LIBEDIT  Directives  *** 

The  following  are  used  in  the  descriptions  of  the  LIBEDIT 
directives: 

rid  -  record  identifier 

foraat  meaning 

type /name  the  record  has  this  type  and  name 

name  the  record  has  this  name  and  the 

default  type 

*  end-of-file  (*BEFORE  only) 


gid  -  group  identifier 
foraat 
type/naae 

name 

typel/namel-type2/naae2 
type 1 /name l-naae2 

naael~naae2 

type/name-* 

name-* 

type/* 

* 

0 


meaning 

the  record  with  this  type  and  name 

the  record  with  this  name  and  the 
default  type 

a  group  of  records 

a  group  of  records  of  typel 

a  group  of  records  with  the  default 
type 

all  records  of  this  type  beginning 
with  <name> 

all  records  of  the  default  type 
beginning  with  <name> 

all  records  of  this  type 

all  records 

insert  a  zero-length  record 
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The  following  are  some  of  the  LIBEDIT  directives.  Directives  start 
with  an  asterisk  in  column  1,  followed  by  the  directive  nasie  (or 
abbreviation) .  Directives  can  be  continued  (gid  entries  cannot  be 
split).  For  example: 

♦BEFORE, ovl/pl,ovl/p2 
ovl/p3 


♦ADD  LIBn, gidl ,gid2, . . . 

Append  records  to  a  record  group. 

Parameters:  LIBn  -  a  record  group  (from  a  CATALOG  listing) 

(1  <-  n  <-  63) 

gidi  -  records  from  the  current  replacement  file 
to  be  appended 

♦BEFORE  rid, gidl, gid2,...  (*B) 

Insert  records  before  a  specified  record. 


♦BUILD  dname 

Build  a  directory  at  the  end  of  the  new  file. 

Parameters:  dname  -  the  name  for  the  directory  record 

(1-7  alphanumerics) 

♦COMMENT  rid  comment 

Add  a  comment  to  the  prefix  table. 

Parameters:  comment  -  up  to  70  characters  with  excess 

truncated 


♦COPY  Copy  the  new  file  to  the  old  file  after  editing. 

Remarks:  *C0PY  is  the  same  as  LIBEDIT, ... ,C. 


♦DATE  rid  comment 

Add  the  date  and  a  comment  to  the  prefix  table. 

Parameters:  comment  -  up  to  70  characters  with  the  excess 

truncated 


♦DELETE  gidl,gid2, . . .  (*D) 

Do  not  copy  the  specified  records  to  the  new  file. 
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*FILE  lfn  The  naae  of  the  file  containing  the  replacement  records. 

Parameters:  lfn  -  use  ♦  for  the  replacement  file  from  the 
LIBEDIT  command  ( B" ) 

(default:  LGO) 


♦IGNORE  gidl,gid2, . . . 

Ignore  specified  records  in  the  replacement  file. 


Examples:  *FILE  myrecs 

♦IGNORE  D-* 

A —  ignore  all  records  from  D  to  the 
end-of-file 


♦INSERT  rid,gidl,gid2,...  (*I,  * AFTER ,  *A) 

Place  the  replacement  records  after  the  specified  groups  in 
the  new  file. 


♦LIBGEN  record_name 

Generate  a  user  library  (using  LIBGEN)  after  processing. 

Parameters:  record_name  -  the  name  of  the  new  user  library 

directory  record 

Remarks:  ♦LIBGEN  overrides  *VERIFY. 


♦LIST  list_f ile, list_opt 

Specify  the  list  file  and  the  list  options. 

Parameters:  list_file  -  same  as  LIBEDIT, L* 

list_opt  -  same  as  LIBEDIT, LO- 


*NEW  newfile 

Specify  the  name  of  the  new  file. 
Parameters:  newfile  -  same  as  LIBEDIT, N- 


♦NOINS  Prevent  the  insertion  of  unreplaceable  records. 
Remarks:  same  as  LIBEDIT, NI 


♦NOREP  lfnl, lfn2, . . . 

Do  not  automatically  replace  records  from  the  specified  files. 

Remarks:  Records  from  these  files  can  be  copied  to  the 

new  file  only  by  using  * AFTER,  ♦BEFORE,  ♦INSERT, 
or  ♦REPLACE. 
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*NOREW  Do  not  rewind  the  old  or  new  files. 

Remarks:  Same  as  LIBEDIT.NR. 

♦OLD  oldfile 

Specify  the  name  of  the  old  file. 

Remarks:  Same  as  LIBEDIT,P«. 

*RENAME  rid, name 

Rename  a  record. 

Parameters:  rid  -  the  name  of  the  replacement  or  old  file 

record  to  be  renamed 

name  -  the  new  name 


♦REPLACE  gidl ,gid2, . . . 

Replace  old  file  records  with  records  from  the  replacement 
file. 

Examples:  The  old  and  replacement  files  each  contain 

records  A,  B,  C,  D.  To  replace  only  C  and  D,  use 
either  of  the  following: 

♦FILE  replfyl  *FILE  replfyl 

♦NOREP  replfyl  * IGNORE  A-B 

♦REPLACE  C-D 


♦REWIND  lfn 

Rewind  a  file  before  and  after  editing. 


♦TYPE  type  (*NAME) 

Set  the  default  record  type. 

Parameters:  type  -  the  record  type  (ABS,  OPL,  OVL,  PROC,  REL, 

TEXT,  ULIB) 

♦VFYLIB  Verify  the  new  file  against  the  old  file  using  VFYLIB. 

Remarks:  Overridden  by  *LIBGEN. 
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***  DTRC  Object  Libraries  *** 

The  following  object  libraries  have  been  added  to  NOS  at  DTRC: 

DTLIB/UN»NSYS  -  Subprograms  written  or  aaintained  by  the 
Coaputer  Center 

To  use:  ATTACH, DTLIB/UN-NSYS. 

LDSET , LIB-DTLIB .  -or-  LIBRARY, DTLIB. 
LGO. 

UTILITY/UN”NSYS  -  Programs  written  or  aaintained  by  the 
Coaputer  Center 

To  use:  ATTACH, UTILITY/UN-NSYS. 

LIBRARY, UTILITY, 
prognaa. 


***  Examples  *** 

1)  Create  a  library  of  subprograms. 

ATTACH , aysubs  s . 

FTN5, I-aysubss,OPT-2,L*0. 

PURGE , aysubs /NA . 

DEFINE, aysubs/CT-PU. 

LIBGEN.P-aysubs. 


2)  Create  a  library  of  all  subprograms  from  an  UPDATE  library. 

ATTACH , OLDPL-ayp 1 . 

UPDATE, F. 

FTN5,I,L-out2,OPT-2. 

PURGE, aysubs/NA. 

DEFINE, aysubs/CT-PU. 

LIBGEN , P-aysubs . 

ROUTE, out2,DC-PR. 
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3)  Add  a  subprogram  to  an  existing 
in  alphabetical  order. 

Direct  files 


j obnam3 . 

USER, user ,pw. 
CHARGE,.... 

FTN5.0PT-2. 

ATTACH, subs. 

PURGE, NEW/NA. 

DEFINE, NEW. 

LIBEDIT, P-subs. 

PURGE, subs. 

CHANGE, subs-NEW/CT-PU. 
<eor> 

*ADD  LIBl.LGO 


4)  Delete  subprogram  BADSUB  from  an 


library  and  have  the  output  list 


Indirect  files 


j  obnam3 . 

USER, user ,pw. 
CHARGE,..-.. 
FTN5.0PT-2. 
GET, subs. 


LIBEDIT , P-subs . 
REPLACE, NEW-subs. 

<eor> 

*ADD  LIBl.LGO 


existing  library. 


GET,OLD-subs. 

LIBEDIT, B-0, 2. *DELETE  REL/badsub 
REPLACE, NEW-subs. 


88/10/01 


RevO 


Page  5-6-1 


*****  Loader  ***** 

The  loader  is  responsible  for  loading  all  programs,  resolving  any 
external  references,  and  optionally  initiating  execution. 

Once  loading  of  a  program  is  started,  no  other  control  statements 
may  interrupt  the  load  sequence.  For  instance,  a  'LOAD,lfn.'  statement 
may  only  be  followed  by  another  'LOAD, lfnl.'  or  one  of  the  loader 
control  statements  or  HAP,  REDUCE  or  others  listed  in  the  Loader 
Reference  Hanual. 


***  Types  of  Loading  *** 

Loading  differs  according  to  whether  the  input  is  one  or  more 
object  modules  or  a  single  memory  image  module.  Loading  of  object 
modules  can  involve  overlay  or  segment  generation  and  can  result  in  one 
or  more  memory  image  modules.  A  basic  load  results  in  one  memory  image 
(absolute)  module. 


Object  module  loading  One  or  more  object  modules  are  loaded,  libraries 

are  searched  for  the  external  references, 
addresses  are  adjusted,  and  a  memory  image 
module  may  be  produced. 


Memory  image  loading  This  is  a  special  case  because  no  external 
'  linkage  or  address  adjustment  is  required. 


Basic  loading 


All  object  code  is  loaded  at  the  same  time, 
resulting  in  a  single  memory  image  module. 
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Segmentation  For  large  programs,  segmentation  should  be  used 

to  divide  the  program  into  several  memory  image 
modules,  called  segments. 

With  segmentation,  only  those  portions  of  the 
program  needed  at  a  given  moment  are  in  memory. 
Different  memory  image  modules  reside  in  the 
same  area  of  memory  at  different  times. 
Depending  on  execution  requirements,  different 
memory  image  modules  are  loaded  dynamically. 

Features: 

-Segmentation  allows  any  number  of  levels, 
limited  only  to  a  total  of  4093  segments. 

-After  segments  have  been  generated,  their 
loading  is  automatic. 

-References  between  segments  may  be  upward 
or  downward. 

-At  execution  time,  a  resident  program  is 
loaded  which  loads  the  root  segment. 
Thereafter,  it  loads  the  other  segments  as 
required. 


Overlay  generation  An  overlay  is  a  collection  of  executable 

programs  which  are  called  into  memory  at 
execution  time,  according  to  an  overlay 
structure  which  is  defined  in  the  source  code. 


Overlay  capsule 

generation  For  large  programs,  overlay  capsules  may  be 

used  to  divide  the  program  into  an  absolute 
main  program  and  one  or  more  capsules  which 
are  loaded  and  unloaded  by  the  user. 

Because  overlays  and  overlay  capsules  require  statements  in  your 
program  to  cause  the  overlaying  to  take  place,  they  are  not  recommended. 
Instead,  use  segmentation,  which  is  controlled  by  directives  external 
to  your  program. 
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***  Loader  Control  Stateaents  *** 

See  Appendix  D  for  the  syntax  of  the  following  control  stateaents 

used  to  load  a  prograa. 

EXECUTE  Coaplete  loading,  fill  unsatisfied  references  by  system  (and 
user)  library  search,  generate  load  aap  and  execute  the 
prograa. 

LDSET  Set  any  of  several  loader  options  for  the  current  load  only. 

LGO  Load  and  execute  the  default  coapiler  binary  output  file. 

LIBLOAD  Load  modules  from  specified  library  which  contains  the 
specified  entry  points. 

LOAD  A  list  of  files  whose  contents  are  to  be  loaded. 

name  Load  and  execute  binary  program  or  procedure  in  local  file 
<naae> . 

NOGO  Coaplete  the  loading  of  a  program,  including  generating  load 
aap,  but  do  not  execute. 

SATISFY  Satisfy  unsatisfied  externals  prior  to  noraal  satisfaction  at 
load  coapletion. 

SLOAD  Selectively  load  aodules  from  local  file  <lfn>. 


In  addition,  the  following  Loader-related  control  statements  are 
also  available: 

LIBRARY  Specify  a  set  of  global  libraries  to  be  searched  for  externals 
and  prograas  and  the  order  in  which  the  libraries  are  to  be 
searched. 

HAP  Specify  the  global  default  option  for  load  aaps. 

REDUCE  Turn  the  reduce  flag  on  or  off. 

Set  field  length  for  the  next  prograa  execution. 


RFL 
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***  Segmentation  *** 

To  implement  segmentation,  a  separate  directive  record  is  prepared 
to  describe  the  tree  structure.  The  modules  will  be  loaded 
automatically  as  needed.  Job  field  length  is  adjusted  dynamically 
if  the  program  has  no  blank  common,  has  no  level  statements  and  is  not 
in  RFL  mode. 

All  necessary  Record  Manager  routines  must  be  in  the  root  segment. 
Other  LOAD  and  LDSET  statements  follow  the  SEGLOAD  statement: 

SEGLOAD, I“lfndir ,B*lfnabs ,LO“lfnout . 


**  SEGLOAD  Directives  ** 


x  TREE  y 

To  define  a  tree  structure. 

<y>  may  be  comma-separated  list  of  other  trees 

(pre-def ined) ,  segments  or  names  of  individual  subprograms 

to  be  assigned  a  common  starting  address. 

x  TREE  f-(c,d) 

To  indicate  branching  of  the  tree  use  -,  then  all 
following  items  are  enclosed  in  parentheses. 


c  INCLUDE  a,b 

To  assign  programs  <a>  and  <b>  to  segment  <c>. 

Copies  of  a  routine  may  be  in  different  segments. 

c  GLOBAL  coml,com2 

To  establish  named  commons  at  desired  segment. 

Reference  name  to  left  of  directive  must  be  defined  by  a 
previous  directive. 

c  GLOBAL  coml , com2~save 

To  save  global  block  on  disk  for  later  calls  to  the 
segment  which  contains  it. 

END  ept 

Should  be  the  last  directive  in  the  record,  where  <ept>  is 
the  entry  of  the  main  program  in  the  root  segment. 
Non-fatal  error  if  omitted. 
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**  Saaple  Tree  Diagram  ** 


A  block  data  subprogram  defines  common  /COM1/  which  is  to  be  loaded 
with  program  S2.  /CONI/  is  also  referred  to  by  S6  and  S7. 

MYMAIN 


SI  /COMl/  S3  S4 

S2  S12 

i 

!  | 

S6  S7  (S6  and  S7  use  /COMl/) 


SEG 

INCLUDE 

S2.BLKDAT. 

SEG 

GLOBAL 

COMl 

PLUM 

TREE 

SEG- (S6,S7) 

PEAR 

TREE 

MYMAIN- (SI , PLUM, S3 , S4 , S5) 

S5 

INCLUDE 

S9,F10,S11 

S4 

INCLUDE 

END 

S12 

i 

i 

S5 

S9 

F10 

Sll 


By  using  nested  parentheses  one  TREE  directive  may  be  eliminated. 


(. 


H.— 
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***  Segmentation  Cautions  *** 

1.  To  develop  a  segmented  job,  several  runs  may  be  required,  so 
relocatable  object  code  should  be  cataloged.  Coaaon  blocks  and  Record 
Manager  routines  aay  need  to  be  INCLUDEd  in  lower  segaents  to  operate 
properly. 


2.  The  load  aap  aust  be  checked  carefully  for  any  duplicate  coaaon 
block  entries.  Each  eoason  block  which  is  referenced  in  aore  than  one 
segaent  aust  be  put  into  a  global  at  the  nearest-to-the-root  segaent. 

If  any  coaaon  block  appears  aore  than  once  without  "safe",  a  global  is 
required  to  eliainate  duplicate  storage  areas.  If  input/output  is 
performed  in  several  segaents,  soae  Record  Manager  coaaon  blocks  aay 
be  aultiply  defined  (e.g.,  AOB.RM  or  Q8.I0.). 

Subfields  in  SEGLOAD  directives  which  contain  any  of  the  special 
characters  ,  -  (  )  or  which  start  with  a  $  aust  be  defined  as  literals 
(i.e.,  deliaited  by  $...$).  Eabedded  $  is  represented  by  $$,  thus, 

$TAN  aust  be  specified  as  $$$TAN$  . 

When  Record  Manager  coaaon  is  global  to  a  root  segaent,  the  loader 
aay  detect  errors  in  initializing.  If  so,  an  INCLUDE  directive  will  be 
required  to  aove  the  RM  routines  to  that  segaent  (e.g., 

' MYMAIN  INCLUDE  INCOM-'  ). 


3.  Directives  aust  not  go  beyond  column  72  of  a  line.  They  may  be 
broken  alaost  anywhere  and  continued  on  the  next  one  or  aore  cards/ 
lines.  The  continuations  have  a  coaaa  (,)  in  column  1  as  the 
continuation  signal,  then  the  directive  is  continued  starting  in 
column  2. 

Continued  directives  should  be  avoided,  if  possible,  to  improve 
readability. 


A.  FTN5  users  should  avoid  passing  external  references  as  subprogram 
arguaents.  When  the  external  is  not  in  the  root  segaent  or  the  same 
segaent  as  the  call,  execution  will  generate  the  fatal  error  message 
’NON-EXECUTABLE  WORD  LOADING  A  SEGMENT ' . 


r 
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***  Coapile,  Load  and  Catalog  Abaolute  Prograa  *** 


**  Simple  Load  ** 


j obnaae , . . . . 

USER, user, pw. 

CHARGE, 

FTN5.0PT-1. 

LOAD.LGO. 

NOGO,nyprog.  < —  absolute  module  into  MYPROG 

REPLACE , myprog . 

<eor> 

prograa  myprog 
*  •  • 

<eoi> 


**  SEGLOAD  ** 


j  obnaae 
USER, user ,pw. 

CHARGE, .... 

FTN5,OPT-l. 

REPLACE, LGO-aysglgo. 

PURGE, my segnu/NA. 

DEFINE , ays  egnu . 

SEGLOAD, Bmmy» egnu . 
LOAD.LGO. 

NOGO. 

PURGE, mysegl/NA. 

CHANGE , ays eg 1 -ays egnu . 
■<eor> 

<  FTN5  source  prograa  > 
<eor> 

<  SEGLOAD  directives  > 
<eoi> 


name/ code 


< —  save  relocatable  aodules  for 
possible  re-segaentation 
<—  HYSEGNV  for  absolute  segaents 


< —  absolute  segaents  onto  MYSEGNU 
< —  replace  old 
< —  copy  of  MYSEGL 


**  Interactive  Siaple  Execution  ** 

GET, ays or . 

FTN5 , I-ays  or , L-ayout , OPT- 1 . 

LDSET.MAP-S.  < —  to  see  any  aissing  routines 

LGO. 

e  e  e 

ROUTE, ayout,DC-PR.  < —  print  the  compilation  listing 
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*****  Other  Software  ***** 

***  Accessing  Other  Software  *** 

Progress  obtained  from  other  vendors  are  normally  execute-only.  To 
access  them,  you  normally  need 

ATTACH, program/UN-un,M-E.  < —  A  below 

-or- 

GET,progran/UN-un.  < —  G  below 

where  un  currently  is  APPLLIB,  LIBRARY  or  NSYS. 

***  UN-APPLLIB  *** 

As  of  the  date  of  this  page,  UN-APPLLIB  contains: 

GPSS  A  General  Purpose  Simulation  System 
PERT78  A  Pert/Time 


***  UN-LIBRARY  *** 

As  of  the  date  of  this  page,  UN-LIBRARY  contains: 


BETONOS 

A 

NOS/BE  to  NOS  command  help  (HELPBE)  and  NOS/BE  file  loader 
(BELOAD) 

DTLIB 

A 

DTRC  subprogram  library 

HOTSPOT 

G 

Analyze  a  program  for  inefficient  code 

PROCFIL 

G 

DTRC  procedure  library 

SIMII5 

A 

Simscript  II. 5 
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***  UN-NSYS  *** 

As  of  the  date  of  this  page,  UN“NSYS  contains: 

CALCFN  G  Calcoap  Functional  Package 

CALC936  G  Calcoap  936  Subroutine  Package  (7-traek  tapes  only) 

DISSPLA  G  DISSPLA  Graphic  Subroutine  Package 
IMSLM  A  IMSL  10  Mathematical  Subroutine  Library 

IMSLSS  A  IMSL  10  Special  Function  and  Statistical  Subroutine  Library 
LINPACK  G  Simultaneous  Linear  Algebraic  Equation  Solver  Package 
UTILITY  G  DTRC  program  library 
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*****  Magnetic  Tape  ***** 


Magnetic  tapes  should  be  used  £or  sequential  data  for  such  purposes 

as: 

.  Transfer  of  information  to  and  from  other  computers  and 
off-line  peripherals 
.  Files  which  are  used  infrequently 
.  Back-up  copies  of  disk  files 
.  Long-term  storage  of  data 

Tapes  should  not  be  used  for  scratch  files  or  random  inforaiation.  For 
safety,  two  copies  on  different  tapes  should  be  maintained,  or  for  data 
which  is  updated,  a  grandfather-father-son  system  is  advised.  It  is 
not  wise  to  mount  a  tape  containing  good  data,  read  through  it,  and 
write  new  data  at  the  end.  Instead,  copy  the  existing  data  to  a  second 
tape  and  add  the  new  data  to  the  second  tape,  retaining  the  first  tape 
as  a  back-up. 

Processing  a  file  on  tape  will  take  considerably  more  I/O  time  than 
on  disk  and  more  elapsed  time. 

Information  concerning  the  physical  and  logical  characteristics  of 
the  tape  is  specified  in  control  statements. 

Nine-track  tapes  are  supported  on  the  DEC  VAX  and  CDC  CYBER  860 
computers;  7-track  tapes  are  supported  on  the  CDC  CYBER  860.  There  are 
no  tape  drives  on  the  Cray,  so  tapes  must  be  accessed  via  one  of  the 
front  ends. 


***  Tape  Labels  *** 

Tapes  may  be  labelled  or  unlabelled.  Labels  should  always  be  used 
except  when  writing  data  for,  or  reading  data  from  a  computer  which 
cannot  handle  ANSI  standard  labels. 

In  general,  a  labelled  tape  has  volume  and  end-of-volume  labels, 
and  may  also  have  user  labels.  Each  file  on  the  tape  may  have  its  own 
header  and  trailer  labels. 


***  Tape  Formats  *** 

Generally,  records  on  tape  are  fixed  or  variable  length,  blocked 
or  unblocked,  ASCII  or  EBCDIC  (9-track) ,  BCD  (7-track) ,  coded,  or 
binary.  Where  possible,  tapes  written  by  or  for  another  computer 
should  be  9-track,  1600  epi,  fixed  length,  blocked,  ASCII. 
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***  Tape  Care  and  Cleaning  *** 

Tapes  should  be  stored  in  closed  containers  in  racks  which  give 
them  vertical  support.  Tapes  nay  not  be  spliced.  They  should  be  read 
and  rewound  at  least  every  six  months.  Logs  should  be  kept  on  contents, 
£ornat,  and  creation  dates  o£  tapes. 

I£  a  tape  has  many  parity  errors,  cleaning  it  may  help.  Even  a 
brand  new  tape  may  need  cleaning.  This  o££-line  process  does  not 
destroy  the  information  on  the  tape.  If  a  tape  receives  heavy  usage, 
cleaning  it  after  ten  or  more  uses  may  reduce  the  incidence  of  parity 
errors.  A  tape  can  also  be  certified,  which  determines  whether  there 
are  any  areas  on  the  tape  which  do  not  record  properly.  Certification 
DESTROYS  current  information  on  the  tape  (except  VSN) .  To  change  the 
VSN,  contact  the  Tape  Librarian  and  request  blank  labelling  or 
degaussing. 

If,  after  a  tape  has  been  cleaned,  it  still  has  many  parity  errors, 
it  should  be  exchanged  for  a  new  tape.  The  information  on  the  old  tape 
is  not  recovered  automatically  in  this  case. 

To  have  a  tape  cleaned  or  certified,  submit  an  off-line  work 
request  to  the  Tape  Librarian.  Users  who  are  not  at  the  Carderock  site 
should  call  (202)  227-1967. 

When  possible,  slot  tapes  should  be  in  the  Computer  Room 
environment  for  at  least  two  hours  before  reading  or  writing.  This 
allows  temperature  and  humidity  to  stabilize  and  should  minimize  tape 
problems. 

Please  notify  Code  1893.1,  (202)  227-1907,  of  any  unusual  tape 
problems. 


» 
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***  Using  Tapes  on  the  CYBER  860  *** 

The  CDC  CYBER  860  has  six  9-track  tape  drives  (£our  for  6250/1600 
cpi  and  two  for  1600/800  cpi) ,  and  two  7-track  tape  drives  (800/556 
cpi) . 

The  following  control  statements  are  used  to  access  or  analyze 
them: 

LABEL  Mount  a  magnetic  tape  and,  if  labelled,  check  the  label. 

LISTLB  List  the  labels  of  an  ANSI-labelled  tape. 

RESOURC  Specify  that  more  than  one  tape  drive  is  required. 

TDUMP  Octal  and  alphanumeric  dump  of  all  or  part  of  a  file. 

VSN  Associate  a  local  file  name  with  one  or  more  volume  serial 

numbers . 


**  Examples  ** 

The  following  examples  illustrate  tape  usage  in  batch  jobs.  Tapes 
may  also  be  used  interactively  (without  the  job,  USER  and  CHARGE 
statements) . 


1.  Unlabelled  NOS/BE  Tape  to  Disk 

xxxx.  job  statement. 

USER,xxxx,upw. 

CHARGE, 1234567890. 

DEFINE,  disk/CT-PU. 

LABEL , tape , F-SI , LB-KU , VSN-NA9999 , D- 1600 , PO-R , R . 
COPYBF , tape , di sk , 5 . 

UNLOAD, tape. 


2.  Copy  Old  Stranger  (Foreign)  Tape  to  New  -  6250  multifile 
xxxx. 

USER, xxxx, upw. 

CHARGE, 1234567890. 

RESOURC , GE- 1 .  < —  one  additional  tape  drive 

LABEL , 1 4 , VSN-NA9998 , D-GE , PO-W ,  W ,  F-  S ,  L-  s  o  f  t  ws  t  r . 

VSN, t5-SLOTxx-CA9995 . 

LABEL, t5, PO-R, R,F-S, D-GE, L-softwstr. 

COP Y , t5 , 1 4 , EL- 10 , M-coded , PO-E . 

UNLOAD, t5. 
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***  Using  Tapes  on  the  DEC  VAX  *** 

The  DEC  VAXcluster  has  six  9-track  tape  drives  (6250/1600  cpi) ;  the 
remote  mini  in  Annapolis  has  two. 

The  following  control  statements  are  used  to  access  or  analyze 
them: 


ALLOCATE 

DEALLOCATE 

DISMOUNT 

INITIALIZE 

MOUNT 


Assign  a  tape  drive  to  a  logical  name. 

Return  a  previously  allocated  device  and  disassociate  the 
job’s  logical  name  from  the  tape  drive. 

Release  a  tape  volume  that  was  previously  mounted. 

Initialize  a  magnetic  tape. 

Mount  a  magnetic  tape  and,  if  labelled,  check  the  label. 


**  Examples  ** 

1.  Initialize  a  VAX/VMS  tape: 

$!  TAPINIT.COM  :  initialize  VAX/VMS  tape,  default  is  1600 
5! 

$  if  p3  .nes.  "1600"  .and.  p3  .nes.  "6250"  then  P3  -  "1600" 

$! 

$  allocate  mu:  tape  1  get  any  available  tape  drive 

$! 

$  mount  tape:  /foreign  /density"'p3'  - 

/comment-"mount  slot' 'pi'  vsn«''p2'  ringin'' 

$  dismount  tape  /noun load 

$  initialize  tape  'p2' 

$  deallocate  tape 

$  exit 

$! 

$!  pi  -  1-  or  2-digit  slot  number  or  NONE 
$J  p2  -  6-character  VSN 

$!  p3  -  density  (6250  or  1600)  defaults  to  1600 
$1 

$1  created  06/23/88  by  CASG 

$1  last  modified  06/24/88  8  1146  by  CASG  (add  "?"  for  help) 

$1 

$1  End  of  TAPINIT.COM 

The  above  is  a  portion  of  the  actual  procedure  to  show  just  the 
defaulting  of  density  and  how  to  initialize  a  tape.  To  see  the 
full  procedure,  which  includes  validation  of  each  parameter,  and 
allows  "?"  for  help  for  the  procedure  and  each  parameter,  type 
"TYPE  VSYS: TAPINIT.COM". 
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*****  Conversion  to  the  Network  ***** 


***  Fortran  Considerations  *** 

Fortran  66  (FTN/FTN4  on  the  CDC  CYBER  750)  programs  should  be 
converted  to  Fortran  77  prior  to  moving  to  the  network. 

The  Fortran  77  (FTN5)  compiler  on  the  CDC  CYBER  860A  is  the  same  as 
on  the  CDC  CYBER  750,  so  no  conversion  is  needed.  Programs  converted 
£rom  CDC  or  the  VAXcluster  to  another  computer  should  not  need 
modification  if  no  extensions  are  used.  Extensions,  of  course,  will 
require  manual  change. 


***  Cobol  Considerations  *** 

Cobol  is  not  available  on  the  Cray. 

Cobol  68  (COBOL  4  on  the  CDC  CYBER  750)  is  not  available  on  the 
VAXcluster  or  the  CDC  CYBER  860A.  Such  programs  should  be  converted  to 
Cobol  74  prior  to  moving  to  the  network. 

The  Cobol  74  (C0B0L5)  compiler  on  the  CDC  CYBER  860A  is  the  same  as 
on  the  CDC  CYBER  750,  so  no  conversion  is  needed.  Programs  converted 
from  CDC  or  the  VAXcluster  to  the  other  computers  should  not  need 
modification  if  no  extensions  to  the  Cobol  Standard  are  used. 
Extensions,  of  course,  will  require  manual  change. 


88/10/01 


RevO 


Page  A-l 


2 

*****  Appendix  A  ***** 

***  ASCII  Character  Set  *** 


f 

* 


char 

ASCII 

(hex) 

EBCDIC 

(hex) 

Display 

(octal) 

char 

ASCII 

(hex) 

EBCDIC 

(hex) 

NUL 

00 

00 

((( 

28 

4D 

SOH 

01 

01 

))) 

29 

5D 

STX 

02 

02 

*** 

2A 

5C 

ETX 

03 

03 

2B 

4E 

EOT 

04 

37 

2C 

6B 

ENQ 

05 

2D 

2D 

60 

ACK 

06 

2E 

•  •  • 

2E 

4B 

BEL 

07 

2F 

III 

2F 

61 

BS 

08 

16 

000 

30 

FO 

HT 

09 

05 

111 

31 

FI 

LF 

OA 

25 

222 

32 

F2 

VT 

OB 

OB 

333 

33 

F3 

FF 

OC 

OC 

444 

34 

F4 

CR 

OD 

OD 

555 

35 

F5 

SO 

OE 

OE 

666 

36 

F6 

SI 

OF 

OF 

777 

37 

F7 

DLE 

10 

10 

888 

38 

F8 

DC1 

11 

11 

999 

39 

F9 

DC2 

12 

12 

•  •  • 

•  •  • 

3A 

7A 

DC3 

13 

13 

e  e  • 

9  9* 

3B 

5E 

DC4 

14 

3C 

<<< 

3C 

4C 

NAK 

15 

3D 

mmm 

3D 

7E 

SYN 

16 

32 

»> 

3E 

6E 

ETB 

17 

26 

??? 

3F 

6F 

CAN 

18 

18 

m 

40 

7C 

EH 

19 

19 

AAA 

41 

Cl 

SUB 

1A 

3F 

BBB 

42 

C2 

ESC 

IB 

27 

CCC 

43 

C3 

FS 

1C 

1C 

DDD 

44 

C4 

GS 

ID 

ID 

EEE 

45 

C5 

RS 

IE 

IE 

FFF 

46 

C6 

US 

IF 

IF 

GGG 

47 

C7 

space 

20 

40 

55 

HHH 

48 

C8 

Ml 

21 

4F 

66 

III 

49 

C9 

Itfttt 

22 

7F 

64 

JJJ 

4A 

D1 

### 

23 

7B 

60 

RKK 

4B 

D2 

$$$ 

24 

5B 

53 

LLL 

4C 

D3 

m 

25 

6C 

HHH 

4D 

D4 

&&& 

26 

50 

67 

NNN 

4E 

D5 

»  t  » 

27 

7D 

70 

000 

4F 

D6 

Display 

(octal) 


51 

52 
A7 

45 

56 

46 

57 
50 

33 

34 

35 

36 

37 

40 

41 

42 

43 

44 
63 
77 

72 
54 

73 
71 

74 
01 
02 
03 
04 
05 
06 
07 

10 

11 

12 

13 

14 

15 

16 
17 
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char 

ASCII 

(hex) 

EBCDIC 

(hex) 

Dicplay 

(octal) 

char 

ASCII 

(hex) 

EBCDIC 

(hex) 

Display 

(octal) 

PPP 

50 

D7 

20 

hhh 

68 

88 

QQQ 

51 

D8 

21 

iii 

69 

89 

RRR 

52 

D9 

22 

i  i  j 

6A 

91 

SSS 

53 

E2 

23 

kkk 

6B 

92 

in 

54 

E3 

24 

111 

6C 

93 

UUU 

55 

E4 

25 

mm 

6D 

94 

VVV 

56 

E5 

26 

nnn 

6E 

95 

WWW 

57 

E6 

27 

000 

6F 

96 

XXX 

58 

E7 

30 

PPP 

70 

97 

YYY 

59 

E8 

31 

999 

71 

98 

ZZZ 

5A 

E9 

32 

rrr 

72 

99 

etc 

5B 

4A 

■  sa 

73 

A2 

\\\ 

5C 

EO 

75 

ttt 

74 

A3 

]]] 

5D 

5A 

UUU 

75 

A4 

5E 

5F 

76 

vw 

76 

a5 

— 

5F 

6D 

65 

WWW 

77 

A6 

grave 

60 

79 

xxx 

78 

A7 

aaa 

61 

81 

yyy 

79 

A8 

bbb 

62 

82 

ZZZ 

7A 

A9 

ccc 

63 

83 

{{{ 

7B 

CO 

61 

ddd 

64 

84 

1  1  1 

7C 

6A 

eee 

65 

85 

}}} 

7D 

DO 

62 

fff 

66 

86 

— 

7E 

Al 

ggg 

67 

87 

DEL 

7F 

07 
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A 


4 


► 


( 

t 


» 

* 

l 


( 


i 


i 

4 

t 


i  c 

I 


Display 

Code 

char¬ 

acter 

*** 

punch 

026 

CDC 

punch 

029 

if 

diff 

Character  Set  *** 

7-track  9-track 

ext  BCD  ASCII  EBCDIC 

note/name 

00 

•  *  • 

•  •  • 

2-8 

25 

6C 

colon  (1,2) 

01 

AAA 

12-1 

61 

41 

Cl 

02 

BBB 

12-2 

62 

42 

C2 

03 

CCC 

12-3 

63 

43 

C3 

04 

DDD 

12-4 

64 

44 

C4 

05 

EEE 

12-5 

65 

45 

C5 

06 

FFF 

12-6 

66 

46 

C6 

07 

GGG 

12-7 

67 

47 

C7 

10 

HHH 

12-8 

70 

48 

C8 

11 

III 

12-9 

71 

49 

C9 

12 

JJJ 

11-1 

41 

4A 

D1 

13 

KKK 

11-2 

42 

4B 

D2 

14 

LLL 

11-3 

43 

4C 

D3 

15 

MMM 

11-4 

44 

4D 

D4 

16 

NNN 

11-5 

45 

4E 

D5 

17 

000 

11-6 

46 

4F 

D6 

20 

PPP 

11-7 

47 

50 

D7 

21 

QQQ 

11-8 

50 

51 

D8 

22 

RRR 

11-9 

51 

52 

D9 

23 

SSS 

0-2 

22 

53 

E2 

24 

Hi 

0-3 

23 

54 

E3 

25 

UUU 

0-4 

24 

55 

E4 

26 

vvv 

0-5 

25 

56 

E5 

27 

WWW 

0-6 

26 

57 

E6 

30 

XXX 

0-7 

27 

58 

E7 

31 

YYY 

0-8 

30 

59 

E8 

32 

ZZZ 

0-9 

31 

5A 

E9 

33 

000 

0 

12 

30 

FO 

(soaetiaes  00) 

34 

111 

1 

01 

31 

FI 

35 

222 

2 

02 

32 

F2 

36 

333 

3 

03 

33 

F3 

37 

444 

4 

04 

34 

F4 

40 

555 

5 

05 

35 

F5 

41 

666 

6 

06 

36 

F6 

42 

777 

7 

07 

37 

F7 

43 

888 

8 

10 

38 

F8 

44 

999 

9 

11 

39 

F9 

45 

+++ 

12 

12-6-8 

60 

2B 

4E 

plus 

46 

— 

11 

40 

2D 

60 

ainus 

47 

*** 

11-4-8 

54 

2A 

5C 

asterisk 

50 

III 

0-1 

21 

2F 

61 

slash 

51 

((( 

0-4-8 

12-5-8 

34 

28 

4D 

left  paren 

52 

))) 

12-4-8 

11-5-8 

74 

29 

5D 

right  paren 

53 

$$$ 

11-3-8 

53 

24 

5B 

dollar 

54 

— 

3-8 

6-8 

13 

3D 

7E 

equal 

55 

20 

20 

40 

blank 

56 

#  #  f 

0-3-8 

33 

2C 

6B 

eoaaa 

57 

•  •  • 

12-3-8 

73 

2E 

4B 

period 
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Display 

Code 

char¬ 

acter 

punch 

026 

punch 

029 

if 

diff 

7-track 
ext  BCD 

9- 

ASCII 

track 

EBCDIC 

note/name 

60 

### 

0-6-8 

3-8 

36 

23 

7B 

pound 

•  61 

[[[ 

7-8 

12-2-8 

17 

5B 

4A 

1  bracket 

62 

]]] 

0-2-8 

11-2-8 

32 

5D 

5a 

r  bracket 

63 

111 

2-8 

25 

6C 

percent  (1,2) 

63 

•  •  e 
a  a  • 

2-8 

25 

6C 

colon  (1,2) 

(sometimes  16) 

64 

»!#«»! 

4-8 

7-8 

14 

22 

7F 

quote 

65 

0-5-8 

35 

5F 

6D 

underline 

66 

777 

11-2-8 

12-7-8 

52 

21 

4F 

exclam  (3) 

66 

m 

11-0 

52 

21 

4F 

exclam  (3) 

67 

&&& 

0-7-8 

12 

37 

26 

50 

ampersand 

70 

t  r  » 

11-5-8 

5-8 

55 

27 

7D 

apostrophe 

71 

??? 

11-6-8 

0-7-8 

56 

3F 

6F 

ques  t i on 

72 

<« 

12-2-8 

12-4-8 

72 

3C 

4C 

less  than  (3) 

72 

<« 

12-0 

72 

3  C 

4C 

less  than  (3) 

73 

>>> 

11-7-8 

0-6-8 

57 

3E 

6E 

greater  than 

74 

@@@ 

5-8 

4-8 

15 

40 

7C 

at 

75 

\\\ 

12-5-8 

0-2-8 

75 

SC 

EO 

reverse  slant 

76 

AAA 

12-6-8 

11-7-8 

76 

5E 

5F 

circumflex 

77 

e  •  e 
*  »  * 

12-7-8 

11-6-8 

77 

3B 

5E 

semicolon  (4) 

55 

6-8 

0-4-8 

20 

40 

blank  (5) 

Notes: 

(1)  In  the  63-cbaracter  set  (NOS/BE),  Display  Code  00  has  no 
character,  and  63  is  the  colon  (:).  In  the  64-character 
set  (NOS),  00  is  the  colon  (:) ,  and  63  is  the  percent  00. 

(2)  On  7-track  tape,  this  becoaes  zero  (display  33). 

(3)  Alternate  punches. 

(4)  Avoid  a  whole  word  of  semicolons,  which  is  a  negative  zero 
and  is  treated  as  an  end-of-reeord. 

(5)  On  soae  terminals,  this  is  transmitted  as  a  binary  zero. 
For  these  terminals,  avoid  putting  this  punch  in  columns 
9-10,  19-20,  ...,  79-80,  as  each  will  be  interpreted  as  a 
zero-byte  terminator. 


i 
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*****  Appendix  B  ***** 


***  Cray  JCL  Commands  *** 

Cray  JCL  commands  have  the  following  general  syntax: 

verb  sepl  paraml  sep2  paraa2  . . .  sepn  paraan  term  coaaents 

verb  is  the  naae  of  the  routine  to  be  executed.  It  consists  of  an 
alphabetic  character  (A -Z,  a-z,  $,  Z,  €)  followed  by  0-6 
alphanuaeric  characters  for  systea,  local  dataset  naae  and 
systea  dataset  naae  verbs;  or  1-8  alphanuaeric  characters  for 
library-defined  verbs. 

sepi  are  separators  and  include: 

,  -  VERB, par aae ter. 

(  -  VERB (par aae t er) . 

.  -  VERB, parameter.  < —  use  period  if  conaa 

)  -  VERB (parameter)  < —  use  right  paren  if  left  paren 

,  -  VERB (parameter .parameter) 

-  -  VERB (keyword-value) 

:  -  VERB (keyword-valuel :value2) 

A  -  VERB (.. .parameters. .. *  < —  statement  continued 

parameters)  < —  on  another  line 

-  VERB (keyword- 'string') 

(...)  -  VERB (keyword- (value: value)) 

paraai  are  parameters,  which  aay  be  positional  or  keyword. 

Positional  parameters  have  one  of  the  following  formats: 
value 

valuel:value2: . . . :valuen 

Keyword  parameters  have  one  of  the  following  formats: 
keyword 
keyword-value 

keyword-valuel :value2 : . . . :valuen 

term  is  the  statement  terminator.  It  is  either  a  period 
VERB. 

VERB , parameters . 
or  a  right  parenthesis 
VERB (parameters) 

comments  follow  the  terminator. 
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***  Strings  *** 

The  following  string  representations  are  used  in  this  appendix: 
aa...a  1  or  sore  alphabetic  characters 

axx...x  1  or  more  alphanumeric  characters,  the  first  alphabetic 

xxx... x  1  or  more  alphanumeric  characters 

nnn...n  1  or  more  decimal  (unless  otherwise  stated)  digits 


*** 


Some  Common  Parameters 


*** 


The  following  parameters  are  used  in  many  JCL  commands.  If  they 
have  a  different  meaning  or  a  special  condition,  it  will  be  mentioned 
in  the  individual  description. 


AM”mode  Alternate  User  Access  Mode  (see  PAM*) 

DC“dc  Disposition  code 

IN  -  input  queue  of  destination  station 
MT  -  magnetic  tape  at  job  origin  uinframe 
PR  -  print  at  job  origin  mainframe 
SC  -  scratch  the  dataset 

ST  -  stage  to  mainframe  (make  permanent  at  job  origin 
mainframe) 

DF“df  Dataset  format  (blocking; 

BB  -  binary  blocked 


BD  -  binary  deblocked 
CB  -  character  blocked 

CD  -  character  deblocked 

TR  -  transparent 
(default:  CB) 

DN-dn  Local  dataset  name  (axxxxxx,  7  maximum) 

ED~ed  Edition  number  (1-4095) 


front-end  conversion) 

(no  reblocking,  no  conversion; 
for  object  modules,  graphics 
output,  etc.) 

(same  as  TR) 

(front-end  converts  to  ASCII 
(VAX)  or  Display  Code  (NOS)) 
(front-end  converts  to  ASCII 
(VAX)  or  Display  Code  (NOS)) 
(no  deblocking;  no  conversion) 


ERR  Suppress  error  termination  messages 

EXO*exo  Execute  option 

ON  -  execute-only  (cannot  be  read  or  PSDUMPed) 
OFF  -  not  execute-only 

I“idn 

IDN-idn  Input  dataset  name  (normal  default:  $IN) 

ID*uid  Additional  permanent  dataset  ID 

(axxxxxxx,  8  maximum) 
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L-ldn 

M-mn 

MF-mf 


MSG 

NA 

0-odn 

ODN-odn 

OWN-owner 

PAM ”«ode 


PDN-pdn 

R-rd 

TEXT- 'text' 

TID-tid 

UQ 

W-wt 


Naae  of  dataaet  to  contain  the  listing 

(default:  $0UT) 

Maintenance  control  word  (axxxxxxx,  8  maxima) 

Front-end  computer 
N1  -  CDC  CYBER  180/860A  (NOS) 

V3  -  DEC  VAXcluster  node  DT3  (VMS) 

(default:  front-end  of  job  origin) 

Suppress  normal  termination  messages 

No  abort.  If  omitted,  an  error  causes  the  job  step  to 
abort . 


Output  dataset  name  (normal  default:  $0UT) 

Owner  of  the  permanent  dataset 

(not  needed  for  your  own  files) 

Public  Access  Mode 

E  -  execute  only  (same  effect  as  EXO-ON) 

M  -  maintenance  only 
N  -  no  public  access 
R  -  read  only 
W  -  write  only 

Example:  PAM-R:N  gives  read  and  write  permission 
(default:  N) 

Permanent  dataset  name  (xxxxxxxxxxxxxxx,  15  maximum; 

enclosed  in  quotes  if 

other  than  A~Z,0~9) 

Read  control  word  (axxxxxxx,  8  maximum) 

Text  (up  to  240  character)  to  be  passed  to  the  front-end, 
enclosed  in  apostrophes  ('...') 

Destination  terminal 

(default:  terminal  of  job  origin) 

Unique  access  (required  to  delete  or  modify  a  dataset) 
(default:  multiple  access) 

Write  control  word  (axxxxxxx,  8  maximum) 
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***  Permanent  Dataset  Utility  Shorthand  Notation  *** 

In  the  permanent  dataeet  utility  commands,  wildcards  may  be  used 
in  the  PDN,  PDS,  ID,  US,  and  OWN  parameters.  An  asterisk  represents 
any  single  character;  a  minus  sign  represents  zero  or  more 
characters.  They  are  illustrated  with  PDN- . 


PDN-ABC- 

PDN-A*** 


PDN— A*- 


PDN— 

PDN-***- 


all  permanent  dataset  names  starting  with  ABC 

all  4-character  permanent  dataset  names  starting  with  A 

all  permanent  dataset  names  containing  the  letter  A 
followed  by  one  or  more  other  characters 

all  permanent  dataset  names 

all  permanent  dataset  names  having  3  or  more  characters 


***  A  Word  About  Continuations  *** 

If  a  COS  JCL  statement  is  too  long  to  fit  on  one  line,  it  may  be 
continued  by  breaking  the  statement  after  a  parameter,  ending  the  line 
with  a  carat  (A) ,  and  continuing  the  statement  on  the  next  line(s). 

For  example, 

FETCH, DN-prog3,SDN-myprog, A 

TEXT- 'GET, myprog.CTASK. ' . 

If  a  text  field  (quoted  string)  is  too  long,  it  may  be  split 
anywhere  by  adding  an  apostrophe  (')  to  close  the  partial  string  and  a 
carat  to  end  the  first  line,  and  starting  the  next  line  with  an 
apostrophe  immediately  followed  by  the  rest  of  the  string.  For 
example, 


DISPOSE, DN-FT14 , SDN-myout 14 , DC-ST , KF-N1 , TEXT- ' USER , us  er , pw. ' A 
' PURGE ,myout 1 4/NA. DEFINE , myout 14 . CTASK . ' . 


-or- 


DISPOSE , DN-FT 1 4 , 5DN-myou t 1 4 , DC-ST , MF-N 1 , A 
TEXT- ' USER , us er , pw . ' A 

'PURGE, myout 14/NA. ' A 
'DEFINE, myoutl4. 'A 
'CTASK. '. 
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***  Summary  of  Cray  JCL  Commands  *** 

The  following  are  Cray  JCL  statements,  except  as  indicated  by: 

(DTRC  -  x)  A  command,  procedure  or  program  added  at  DTRC.  Unless 
otherwise  noted,  these  are  accessed  by: 

ACCESS , DN-x , OWN-PUBLIC . 

LIBRARY, DN-x:*. 
name , . . . . 

x  is  one  of:  PROCLIB,  UTILITY. 


*  Entire  line  is  a  comment. 

Syntax:  *  <eomments» 

Similar  coanaands:  NOS/BE:  COMMENT 

NOS:  COMMENT;  * 

VMS:  i 

E***ples:  *  This  is  a  comment  - 

ACCESS  Make  a  permanent  dataset  local. 

Syntax:  ACCESS, DN-dn,PDN-pdn, ID-uid,ED-ed,R-rd,W-wt , M-mn , 

UQ , NA , ERR , MSG , OWN- owner . 


Parameters:  PDN-pdn  -  If  omitted,  dn  is  used. 

R“rd  -  required  to  read  the  dataset  if  R-  on 
SAVE 

W-wt  -  required  for  ADJUST  if  W-  on  SAVE 

M-mn  -  required  to  DELETE  the  dataset  if  M- 

on  SAVE 

Similar  commands:  NOS/BE:  ATTACH 

NOS:  ATTACH;  GET 

VMS:  no  local  file  concept 

Examples :  ACCESS , DN-myl ocal , PDN-mypermfi 1 e . 

ACCESS , DN-my 1 c 1 , PDN-y ourpermf i 1 e , OWN-y our i d . 


ACCESS , DN-myf i 1 e , UQ . 
DELETE, DN-myfile. 


ACCOUNT  Validate  the  user.  Follows  the  JOB  statement  or,  is  the  first 
interactive  statement. 

Syntax :  ACCOUNT , AC-ac , US-us , UPW-upw , NUPW-nupw . 
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Parameters:  AOac  -  Account  number  (required) 

(10  digits  or  "S"  +  9  digits) 

US-us  -  Username  (your  4-character  User 
Initials) 

UPW-upw  -  User  password  (required) 

NUPW-nupw  -  New  user  password 

Remarks:  This  must  be  the  first  statement  of  an  interactive 

session.  When  entered  via  CDC  NOS  ICF,  US*  may  be 
omitted  because  it  is  supplied  automatically. 

When  entered  via  the  DEC  VMS  Cray  Station,  US*  may 
be  omitted  if  you  entered  it  in  upper  case  in 
response  to  the  CRAY  USERNAME:  prompt. 

See  also:  JOB 

Similar  commands:  NOS/BE,  NOS:  CHARGE 

VMS:  no  user-specified  charging 

Examples :  ACCOUNT , AC-1234567890 , US-xxxx , UPW-mypass . 

ACCOUNT , AC- 1234567890 , US-xxxx , 

UPW-mypas  s , NUPW-nupas  s . 


ACQUIRE  Get  a  front-end  dataset  and  make  it  local  and  permanent. 

Syntax :  ACQUIRE , DN-dn , PDN-pdn , AC-ac , ID-uid , ED-ed , RT-rt , 

R- r d , W-wt , M-mn , UQ , MF-mf , TEXT- 'text', DF-df , 
OWN- ov , P AM-mode , ERR , MSG . 

Parameters:  AC-ac  -  acquisition  code 

IN  -  input  dataset 
IT  -  intertask  communication 
ST  -  dataset  staged  from  front  end 
(MF-) 

(default:  ST) 

ED-ed  -  (defaults:  1  (permanent  dataset 

does  not  exist) 
highest  (permanent  dataset 
exists)) 

RT-rt  -  retention  period  (1-4095  days) 

(default:  45) 

Reurks:  If  the  dataset  is  permanent,  ACQUIRE  is  the  same 

as  ACCESS.  If  not,  then  it  is  the  same  as  FETCH, 
SAVE.ACCESS. 

See  also:  FETCH,  MSFETCH 
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ADJUST 


ALTACN 


ASSIGN 


Similar  commands: 


NOS/BE: 

NOS: 

VMS: 


MSFETCH 
ATTACH;  GET 
HFT  FETCH 


Examp 1 es :  ACQUIRE , DN-myf i 1 e , PDN-myf i 1 e , TEXT- ’ myf i 1 e . FOR ’ . 


Redefine  size  of  a  permanent  dataset. 

Syntax:  ADJUST, DN«dn,NAf ERR, MSG. 

Permissions  required:  write;  UQ  on  ACCESS 

Remarks:  ADJUST  attempts  to  close  the  file.  Subsequent 

references  in  the  same  job  must  reopen  it  and 
begin  at  BOD. 

Similar  commands:  NOS/BE:  ALTER;  EXTEND 
NOS:  APPEND 

VMS:  lengthened  automatically;  cannot 

be  shortened 

Examples:  ADJUST, DN-myf ile,NA. 

Validate  an  alternate  account  number  for  permanent  files. 
Syntax:  ALTACN, AC-ac. 

Parameters:  ac  -  the  alternate  account  number 


Remarks:  ALTACN  validates  the  supplied  Job  Order  Number. 

To  use  the  validated  number,  specify  the  ACN 
parameter  on  the  SAVE  or  MODIFY  command. 


See  also: 

MODIFY,  SAVE 

Similar  commands:  NOS:  CHANGE 

NOS/BE:  RENAME 

Examples: 

ALTACN, AC-1222233344. 

< —  define  the  number 

e  e  e 

SAVE, DN-newfyl, ACN. 

< —  use  the  number 

MODIFY, DN-oldfyl, ACN. 

< —  change  the  number 

Create  a 

local  dataset  and  assign  dataset  characteristics. 

Syntax: 

ASSIGN , DN-dn , LM- lm ,A-al i as 

,BS-bs,U. 

Parameters:  LM-  -  maximum  number  of  512-word  blocks  in  the 

dataset 

(default:  100000) 
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A*  -  alternate  unit  name 

BS“  -  octal  number  of  512-word  blocks  for  the 
I/O  buffer 
(default:  10  octal) 

U  ~  unblocked  dataset 
(default:  blocked) 

Remarks:  See  COS  Reference  Manual  for  additional 

parameters . 

At  system  initiation, 

ASSIGN,DN-$IN,A-FT05. 

ASSIGN,DN-$OUT,A-FT06. 

are  performed  automatically-  You  may  reassign 
them  at  any  time. 

A  Fortran  OPEN  will  not  recognize  an  ASSIGNed 
dataset . 


Similar  commands:  NOS/BE:  REQUEST 

NOS,  VMS:  ASSIGN 

Examples :  ASSIGN, DN-myinput ,A-FT11 . 

* —  Fortran  program  reading  from 
unit  11  will  read  file  MYINPUT 
instead 


AUDIT  Report  on  permanent  datasets. 

Syntax:  AUDIT, L-ldn, PDN-pdn, ID-uid,OWN-own,ACN-acn, 

LO-opt: . . . : opt , SZ-dsz, ACC-opt : opt , 
X-mm/dd/yy: 'hh:mm:ss ' , 

TCR-mm/dd/yy: 'hh:mm:ss ’ , 

TLA-mm/dd/yy: 'hh:mm:ss ' , 

TLM-mm/ dd/yy : 'hh:mm:ss ' . 


Parameters:  L-  ~  list  dataset  name 

(default:  $0UT) 

PDN“  -  n*me  of  permanent  dataset (s)  to  be  listed 


ID- 

-  list 

datasets 

with 

this 

ID 

ID 

-  list 

datasets 

with 

null 

ID 

OWN- 

-  list 

datasets 

with 

this 

ownership  value 

ACN- 

-  list 

datasets 

with 

this 

account  number 
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% 


( 


LO- 


S2" 
ACC - 


X- 

X 

TCR- 

TCR 


TLA" 

TLA 


TLM" 

TLM 


Similar  conandi: 


-  lift  optiona: 

S  -  ahort  lift  (PDN,  ID,  ED;  2  per  line) 
(nay  not  be  mixed  with  other  optiona) 
A  -  aeeeaa  tracking  (owner  name,  count, 
time  of  laat  and  firat  acceaaea) 

B  -  backup  info  (backup  volume  name, etc.) 
L  -  long  lift  (PDN,  ID,  ED,  aize  (worda) , 
retention  time,  acceaa  count,  track 
acceaa  flag,  public  acceaa  mode 
(PAH),  creation,  laat  acceaa,  laat 
dump  time,  device  name,  preferred 
reaidency  (PR),  current  reaidency 
(CR). 

(default  in  batch  if  no  LO) 

N  -  notea  lift 

P  -  permit  lift  (permitted  owner  name, 
acceaa  mode,  acceaa  count,  time  of 
laat  acceaa,  time  of  permit  creation) 
R  -  retired  dataaet  lift  (same  aa  L,  but 
only  retired  dataaeta) 

T  -  text  lift 

X  -  extended  long  liat  (L  plua  number  of 
blocka  and  worda  allocated) 

-  liat  dataaeta  >•  thia  aize  (in  worda) 

-  acceaa  option  parametera 

AH  -  those  datasets  belonging  to  OWN 
that  you  are  allowed  to  see 
PAH  -  those  datasets  belonging  to  OWN 
having  any  form  of  public  access 
(R:W:H:E) 

-  list  datasets  expired  as  of  this  date 

-  liat  datasets  expired  as  of  now 

-  list  datasets  created  since  this  date 

-  not  allowed 

TCR"mm/dd/yy  is  sufficient 

-  list  datasets  not  accessed  since  this  date 

-  not  allowed 

TLA"mm/dd/yy  is  sufficient 

-  list  datasets  modified  since  this  date 

-  not  allowed 

TLH"mm/dd/yy  is  sufficient 

NOS/BEs  AUDIT;  BEGIN, AUDIT 

NOS:  CATLIST 

VHS:  DIRECTORY;  HSSAUDIT 
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Exaaples:  AUDIT, LO-S  <—  «hort  audit 

AUDIT, LO“P  < —  audit  showing  who  can  and 

has  accessed  the  datasets 
AUDIT, LO*L:P:N  <  long  audit,  permitted 

users  and  notes 

AUDIT, LO“L  < —  long  audit 

AUDIT , OWN-PUBLIC.  < —  list  public  files 


AUDPL  Audit  an  UPDATE  program  library  (PL) . 

Syntax:  AUDPL, P-pdn, I“idn, L-ldn,M-mdn, *-m,/-c ,DW-dw, 

LW-lw.JU-ju.DK-list.PM-list.LO-string, 

CM.NA.NR. 

Parameters:  P  I  L  *  /  NR  -  see  UPDATE 

M-  -  Modifications  dataset  name  (will  contain 
reconstructed  modification  sets) 

(default:  $MODS) 

M“0  -  No  modifications  output 

-  Data  width  (number  of  characters  written 
per  line  to  M  dataset) 

(default:  up  to  DW  value  on  UPDATE  stmt) 

~  Listing  width  (number  of  characters  written 
per  line  to  L  dataset 
(Values:  divided  into  pages:  80,  132; 

continuous  listing:  C80,  C132) 
(default:  132,  divided  into  pages) 

JU"  -  Justification 

N  -  identifier  name  lef t-justif ied; 
sequence  number  right-justified; 
no  period  between 

L  -  entire  sequence  field  lef t-justif ied 
with  period  between 

(default:  identified  name  right-justif ied; 
sequence  number  preceded  by  a 
period  and  lef t-justf ied) 

DK-dkl:dk2:...:dkn  Q) 

*!kl » *1R2 , • . . ,  dkj  .  dkk , . . . ,  dkn 1  (2) 

-  Decks  for  A,  C,  D,  H,  I  options  and  PM 

parameter 

(For  (1):  up  to  100  decks; 
for  (2):  separate  single  decks  with 

commas,  and  ranges  of  decks  with 
periods) 

(Maximum  string  length:  96  characters) 
(default:  options  apply  to  all  decks) 

OK  -  By  itself  is  invalid 
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PM-idl:id2: . . . :idn  (1) 

PM-'idl,id2,...,idj.idk,...,idn'  (2) 


-  Pulled  modification  sets  (reconstructs 
modification  sets  for  the  listed 
identifiers  for  the  decks  listed  in  IK) 

(Syntax:  same  as  for  DK“) 

PM  -  By  itself  is  invalid 

LO-string 

-  Listing  options  for  ldn 

Text  listing  (for  IK"  decks,  if  specified) 
A  -  active  lines 
C  ~  conditional  text  directives 
(subset  of  option  D) 

D  -  compile  dataset  generation  directives 
(subset  of  option  A) 

H  -  modification  histories 
I  -  inactive  lines 

Summary  options  (for  the  entire  PL) 

K  -  deck  line  counts 
L  -  identifier  list 
M  -  modification  set  cross~reference 
N  -  identifier  list  in  ASCII  order 
0  -  overlapping  modification  set  list 
P  -  short  summary  of  the  PL 
S  -  status  of  modification  set 
X  -  common  deck  cross~reference 

CM  -  Copy  modifications  (reconstructed 
modification  sets)  to  ldn  and  mdn 

NR  -  Do  not  rewind  modif ications  or  binary 

identifier  list  datasets  at  start  or  end 
of  AUDPL 

Similar  commands:  NOS/BE,  NOS:  UPDATE 

VMS:  CMS;  LIBRARIAN; 

INCLUDE  (in  FORTRAN) 

Examples:  AUDPL, P-mypl,L0”P. 


AUDPL, P“mypl ,PM~mod2a:mod3c: example, 
LO-AIKLMNOPSX. 

COPYF.I-SMODS. 


BLOCK  Convert  an  unblocked  dataset  to  a  blocked  dataset. 

Syntax:  BLOCK, DN-ldn,BLKSIZE-size.  (1) 

BLOCK,  Ia,idn,Oaaodn,BLKSIZE-size.  (2) 

Parameters:  DN“  -  the  dataset  to  be  replaced  (using  an 

intermediate  dataset  SUNBLK) 

(ldn  is  rewound  before  and  after) 
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Remarks : 


BLKSIZE-  -  record  length  in  64-bit  words 
(non-foreign  datasets  only) 

((2)  -  not  permitted  if  previously 
assigned  as  foreign;  record  length 
and  type  are  taken  from  the  input 
ASSIGN) 

1*  "  the  unblocked  input  dataset 

(idn  is  not  rewound  before  the  copy) 

0*  -  the  blocked  output  dataset 

(if  previously  opened  (ASSIGN) ,  odn 
is  not  rewound  before;  otherwise,  odn 
is  created) 

For  foreign  datasets,  the  record  length  and  type 

are  taken  from  the  ASSIGN. 


BLOCK  is  intended  primarily  for  postprocessing 
datasets  created  by  or  for  certain  stations. 

Examples:  BLOCK, DN-myfi le . 

Replace  MYFILE  with  blocked  copy 
of  itself 

BLOCK,  l-myunblk,0**myblk. 

A—  Copy  unblocked  file  HYUNBLK  as 
blocked  file  MYBLK 


BUILD 


Generate  and  maintain  library  datasets. 


Syntax: 

BUILD, 

I-idn, L-ldn, OBL-odn , B-bdn , NBL-ndn 
SORT , NODIR , REPLACE . 

Parameters: 

I"  idn 

-  Directive  dataset  name 

(default:  $IN) 

I 

-  Same  as  I-$IN 

1-0 

-  No  directives 

L-ldn 

-  List  dataset  name 

(default:  $0UT) 
L  -  Same  as  L-$0UT 


OBL-odn  -  Old  object  library  dataset  name 
(default:  $0BL) 

OBL  -  Same  as  0BL-$0BL 

OBL*0  -  No  old  binary  library 

B*bdn  -  Dataset  with  new  object  modules 
(default:  $BLD) 

8  -  Same  as  B-$BLD 

®"0  -  No  modules  to  be  added 
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Directives: 


NBL-ndn  -  Output  new  object  library  dataset  name 
(default:  $NBL) 

NBL  -  Sane  as  NBL-$NBL 

NBL“0  -  No  output  written 

SORT  -  modules  are  to  be  output  in  alphabetical 
order 

(default:  written  in  the  order  they 
were  first  read) 

NODIR  -  Do  not  append  the  directory  to  the 
output  dataset 

(default:  append  the  directory) 

REPLACE  -  Modules  in  the  new  library  are  replaced 
and  in  the  same  order  as  in  the  old 
library 

(default:  new  modules  follow  the 

unreplaced  modules  in  the  new 
library) 

A  directive  consists  of  a  keyword  and,  perhaps,  a 
comma-separated  list  of  dataset  or  module  names. 
The  keyword  is  separated  from  its  list  by  a  blank. 
Directives  cannot  be  continue.  Multiple 
directives,  separated  by  a  semicolon  or  period, 
may  appear  in  one  line. 

FROM  dnl,dn2, . . . ,dnn 

Single  dataset  for  COPY,  OMIT,  LIST,  or  a 
list  of  datasets  (copy  dnl  thru  dnn-1  to 
$NBL,  dnn  is  the  same  as  if  specified 
alone.  If  no  COPY,  OMIT,  dnn  is  also 
copied,  dni  can  be  a  library  or 
sequential  dataset  (like  $BLD) . 

OMIT  fnl,fn2, . . . , fnn 

List  of  modules  to  be  excluded.  Each  fni 
may  be  a  single  name  or  a  group  name, 
i.e.,  with  wildcards  -  (any  0  or  more 
characters)  or  *  (any  single  character) . 

COPY  fnl,fn2, . . . ,fnn 

List  of  modules  to  be  copied.  Each  fni 
may  be  a  single  or  group  name,  or  a  rename 
(ELM"0AK  copies  ELM  and  renames  it  OAK), 
or  an  inclusive  range  such  as  (first, last) 
or  (first,)  or  (.last)  or  (,). 

LIST 

Immediately  list  characteristics  of 
modules  in  input  dataset. 


See  also 


Section  2-6 
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Similar  commands:  NOS/BE:  EDITLIB 
NOS:  LIBEDIT 

VMS:  LIBRARIAN 

Examplas:  BUILD, OBL-O, 1*0. 

SAVE , DN-SNBL, PDN-my 1 ib . 

A —  create  a  new  library  from  $BLD 


ACCESS , DN-SOBL , PDN-mylib. 

BUILD, 1-0. 

SAVE , DN-SNBL , PDN-myl ib . 

A —  add  modules  from  $BLD  to 
existing  library 


ACCESS, DN-mylibl . 

ACCESS, DN-mylib2. 

ACCESS, DN-mylib3. 

BUILD , I , OLB-O , B-0 . 

SAVE ,  DN-$NBL , PDN-myl ib4 . 

-  Directive:  FROM  mylibl ,mylib2,mylib3 

A —  merge  several  libraries  ~  if 
duplicate  module  names,  last 
found  is  retained  (or  use  rename 
form,  if  desired) 


ACCESS , DN-SOBL , pdn-my 1 i b . 

BUILD, B-0. 

SAVE , DN-SNBL , PDN-myl i b . 

-  Directive:  OMIT  badpgm 

A —  remove  a  module  from  a  library 


ACCESS , DN-xyz , PDN-myl ib . 

BUILD, I , OBL-xyz , B-0 , NBL-SBLD, NODIR . 

-  Directive:  COPY  myprog 

A —  extract  module  for  loading 


CALL  Read  control  statements  from  the  first  file  of  another  dataset 

or  transfer  control  to  a  procedure. 

Syntax:  CALL , DN-dn .  < —  read  from  another  file 

CALL , DN-dn , CNS .  < —  call  a  procedure 

Parameters:  DN-dn  -  the  dataset  containing  the  statements  or 

procedure  (rewound  before  use) 

CNS  ~  Crack  Next  Statement  -  the  first  statement 
in  "dn"  is  the  procedure  header;  the 
statement  following  the  CALL  is  treated 
as  the  invocation  of  the  procedure 

See  also:  Section  2-3 

Similar  commands:  NOS/BE,  NOS:  BEGIN 
VMS:  §name 
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Examples:  Without  CNS: 

If  the  firat  file  of  dataset  XYZ  contains: 

ACCESS , DN-INFYL , PDN-MYFILE . 

ACCESS , DN-FILE1 , PDN-MYDATA. 

Then  CALL , DN-XYZ .  will  access  both  datasets. 
This  sight  be  useful  if  you  have  several  jobs 
using  the  saae  files,  or  if  you  have  the  sase 
processing  to  be  done  by  many  jobs. 

With  CNS: 

If  the  first  file  of  dataset  XYZ  contains: 

G, FILE, DATA. 

ACCESS ,  DN-INFYL ,  PDN-&FILE . 

ACCESS, DN-FILE1.PDN-&DATA. 

Then  CALL, DN-XYZ, CNS. 

* , MYF ILE , MYDATA 

will  access  the  datasets  MYF ILE  and  MYDATA. 
Note  that  PROC  and  ENDPROC  statements  and  the 
procedure  naae  (G)  are  not  used. 


"call  by  name" 

Execute  a  program  by  its  local  file  name. 

Syntax:  dn. 

dn, parameters. 

Parameters:  depends  upon  the  local  file  being  executed 

Similar  commands:  NOS/BE,  NOS:  LGO  or  an  lfn 

VMS:  $  name  :—  $  dir: naae 

$  name 

Examples:  ACCESS , DN-myobj . 

myob j . 


CFT  Compile  a  Fortran  source  program. 

Syntax  CFT , I-idn, L“ldn, B-bdn, C-cdn, E-n , EDN-edn , 

OPT-opt i on , MAXBLOCK-mb , INT- i 1 , ALLOC-al 1 oc , 
ON-s  t  r ing , OFF-s  t r ing , TRUNC-nn , AIDS-ai ds , 
CPU-cpu : hdw , UNROLL- r , LOOPMARK [- lmmsgs] , 
DEBUG, SAVEALL, ANSI . 

Parameters:  I-  -  Input  dataset  name 

(default:  SIN) 
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L- 

L-0 

B- 

B-0 

C- 

E- 

EDN- 

ON- 

OFF- 


~  Listable  output 
(default:  $0UT) 

List  only  fatal  errors 

-  Binary  load  nodule  dataset  name 
(default:  $BLD) 

-  No  binary  load  aodules 

-  pseudo-CAL  output  dataset  naae 
(default:  no  dataset) 

Highest  level  of  messages  to  be 
suppressed 

1  ~  comment 

2  -  note 

3  -  caution 

4  -  warning 

5  -  error 
(default:  3) 

-  Alternate  error  listing  dataset 
(default:  no  dataset) 

-  Options  to  be  enabled 
(default:  CELPQRSTV) 

-  Options  to  be  disabled 

(default:  ABDFGHIJNOWXZ) 
A  -  abort  if  errors 
B  -  list  sequence  number  of  code 
generation  block 
C  "  liat  coaaon  block  names  and 
lengths 

D  -  list  DO-loop  table 
E  ~  recognize  compiler  directives 
F  -  FLOWTRACE 

G  -  list  generated  code  (use  only 
if  requested  by  User  Services) 

H  -  list  only  first  statement  of 
each  program  unit 
I  -  generate  label  symbol  table 
J  -  one-trip  DO-loops 
L  -  recognize  listing  control 
•tateaents 
M  -  ignored 

N  -  put  null  symbols  in  symbol  table 
0  ~  identify  out— of— bound  array 

references 

^  ~  allows  double  precision 
Q  -  abort  on  100  fatal  errors 
R  -  round  multiply  results 
S  -  list  source  code 
T  -  list  symbol  table 
V  -  vectorize  inner  DO-loops 
W  -  do  not  use 
X  -  include  crcss-reference 
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l 

TRUNC- 

AIDS- 

OPT- 


( 


c 


Y  -  ignored 

Z  -  put  DEBUG  symbol  table  on  $BLD 

number  of  bits  to  be  truncated 
(default:  0;  maximum:  47) 

nuaber  of  vectorization  inhibition 

ness ages 

L00PN0NE  -  no  messages 
L00PPART  -  aaxiaua  of  3  per  inner 

loop;  100  per  compilation 
LOOP ALL  ~  all  aesaagea 
(default:  LOOPPART) 

options  (no  more  than  one  from  each 
of  the  following  groups; 

0PT*opt:opt: . . .) : 

.  constant  increment  integer 
optimization: 

N0ZER0INC  -  no  incrementation  by 
zero  value  variables 
ZER0INC  -  incrementation  by 

zero  value  variables 
(default:  NOZEROINC) 

.  optiaization  for  1-line  DO-loop 
replaeeaent  with  $SCILIB  call: 
SAFEDOREP  -  no  replacement  if 

DO-loop  has  potential 
dependencies  or 
equivalenced  variables 
FULLDOREP  -  alway  replace 
NODOREP  -  never  replace 
(default:  SAFEDOREP) 

.  move  invariant  code  outside  of 
DO-loop: 

INVMOV  -  enable 
NO I KV MOV  -  disable 
(default:  INVMOV) 

.  instructions  aoving  over  a  branch 
instruction: 

UNSAFE IF  -  enable 
SAFE IF  -  disable 

(default:  SAFEIF) 

.  bottoa  loading  of  scalar  loops: 

BL  -  enable 
NOBL  -  disable 
(default:  BL) 
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MAXBLOCR- 

MAXBLOCR-1 

INT- 

ALLOC- 

CPU- 


.  B  and  T  register  allocation: 

BTREG  -  allocate  maximum  of  24 
scalars  to  T  regs 
NOBTREG  -  allocate  to  memory 
(default:  NOBTREG) 

.  compilation  of  loops  with  specific 
ambiguous  dependencies  in  vector 
and  scalar  versions: 

CVL  -  enable 
NOCVL  -  disable 
(default:  enabled) 

.  update  scalar  temporaries  in 
DO- loops: 

REEPTEMP  -  enable 
RILLTEMP  -  disable 
(default:  enable) 

-  number  of  words  in  a  block  of  code  to 
optimize  or  vectorize 

-  disable 

(default:  2310;  MAXBLOCR-1:  disable) 

-  integer  lengths 

64  -  full  64-bit  integers 
24  -  short  24-bit  integers 
(default:  64) 

-  static  memory  allocation 

STATIC  -  all  memory 
STACR  -  read-only  constants  and 
DATA,  SAVE  and  common 
block  entities 

HEAP  -  deferred  implementation 
(default:  STATIC) 


-  mainframe  type  and  hardware  charac¬ 
teristics  for  running  generated  code 
cpu  type: 

CRAY-XMP  -  1,  2  or  4  processors 
CRAY-X1  -  single-processor 
CRAY-X2  -  dual-processor 
CRAY-X4  -  quad-processor 
(default:  compiling  machine) 

hardware  characteristics: 

[NO] EMA  -  extended  memory 
[NO] Cl  -  compressed  index 
[NO] GS  -  gather/scatter 
[NO] CIGS  -  compressed  index  gather/ 
scatter 

[NO] VPOP  -  vector  popcount 
functional  unit 
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[NO] AVL  -  two  vector  logical 
functional  units 
[NO] BDM  -  bidirectional  meaory 

UNROLL*  -  iteration  count  for  unrolling  inner 
DO- loops 

(range:  0  <-  r  <-  9) 

(default:  3) 

UNROLL-O  -  turn  off  unrolling 

LOOPMARK-  -  draw  DO-loop  brackets  in  source 
listing 

HSGS  ~  reasons  for  not  vectorizing 
NOMSGS  -  no  aes sages 
(default:  NOMSGS) 

LOOPMARK  -  saae  as  LOOPMARK-NOMSGS 

DEBUG  -  put  sequence  nuaber  labels  in  Debug 

Syabol  Table 

(forces  ON-IN  and  MAXBLOCK-1) 
(default:  debugging  turned  off) 

SAVEALL  -  allocate  user  variables  to  static 

storage;  coapiler-generated  variables 
to  B  or  T  registers 

ANSI  -  flag  non-ANSI  usage 

Reaarks:  CFT  coapiles  faster  than  CPT77,  but  executes  aore 

slowly. 

See  also:  CFT77 

Siailar  coaaands:  NOS/BE,  NOS:  FTN5 

VMS:  FORTRAN 

Exaaples:  CFT. 

CFT,  I-$CPL.  <—  froa  UPDATE 

CFT , LOOPMARK-MSGS . 

CFT, B-ayobj . 
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CFT77  Compile  a  Fortran  77  source  program. 

Syntax  CFT77, I-idn,L-ldn,B-bdn,C-cdn,E-m,OPT-option, 

INTEGER- i 1 , ALLOC-al 1 oe , ON- s  t  r ing , 

OFF- s  t  r i ng , TRUNC-nn , CPU- cpu : hdw , DEBUG , 

LIST, STANDARD. 

Parameters:  I  L  B  C  E  ALLOC  TRUNC  CPU  DEBUG  -  same  as  CFT 

OPT-  -  at  most  one  from  each  of  the  following 
groups  (0PT-opt:opt) : 

.  optimization: 

FULL  -  attempt  full  optimization 

OFF  -  no  optimization 

(fast  compile) 

NOVECT  -  scalar  optimization  only 
(default:  FULL) 

.  constant  increment  integer 
optimization: 

NOZEROINC  -  no  incrementation  by 
zero-value  variables 
ZEROINC  -  incrementation  by 

zero-value  variables 
(default:  NOZEROINC) 

INTEGER-  -  integer  length 

64  -  full  64-bit  integers 
46  -  short  46-bit  integers 
(default:  46) 

ON-  -  (default:  P  Q  R) 

OFF-  -  (default:  ACFGHJOSX) 

LIST  -  full  compilation  listing  (sets  ON-CGSX) 
DO  NOT  USE  --  specify  ON-CSX  instead 

STANDARD  -  flag  non-standard  Fortran  77  usage 

Remarks:  CFT77  compiles  much  more  slowly  than  CFT,  but 

may  execute  faster.  OPT-OFF  does  not  vectorize 
and  will,  therefore,  run  slower. 

See  also:  CFT 

Similar  commands:  NOS/BE,  NOS:  FTN5 


VMS: 

FORTRAN 

Examples: 

CFT77. 

CFT77, I-$CPL. 

< —  from  UPDATE 

CFT77,B-myobj. 
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CHARGES  Report  on  job  resources. 

Syntax:  CHARGES, SR- opt ions. 

Options:  CPU  -  CPU,  I/O  wait,  and  CPU  wait  tines  since 
start  of  job 

OS  -  permanent  dataset  statistics 
JNU  -  job  naae  and  user  nuaber 
MM  -  job  size  statistics 

NBF  -  nuaber  of  blocks  received  froa/queued  to  a 
front  end 

TASK  -  CPU,  I/O  wait,  and  CPU  wait  times  broken 
down  by  task;  and  totals  for  job 
WT  -  time  spent  waiting  in  input  queue 

Remarks:  CHARGES  is  invoked  automatically  at  job  end. 

Similar  commands:  NOS/BE:  SUMMARY;  ASSETS 
NOS:  ENQUIRE 

VMS:  AT 

Examples:  CHARGES, SR-DS:MM: TASK 


COMPARE  Compare  two  datasets. 

Syntax :  COMPARE , A-adn , B-bdn , L- 1 dn , DF-df , ME-maxe , CP-cpn , 

CS**csn,  {CW«cwjCW-cwl:cw2}  ,ABORT-ac. 

Parameters:  A-  -  input  dataset  names  -  error  if  adn-bdn 

B- 

L“  -  naae  of  dataset  for  list  of  differences 
(default:  $0UT; 

may  not  be  same  as  adn  or  bdn) 

DF"  -  input  dataset  format 

B  -  binary  -  datasets  compared 

logically  with  difference 
listed  in  octal 

T  -  text  -  differences  printed  as 
text 

(default:  T) 

ME"  -  maximum  number  of  differences  to  be 
printed 
(default:  100) 

CP-  -  amount  of  context  printed,  that  is,  the 
nuaber  of  records  on  either  side  of  a 
difference  to  be  printed  -  applies  only 
to  DF-T) 

(default:  0) 


Page  B-22 


RevO 


88/10/01 


COP  YD 


COPYF 


CS-  -  amount  of  context  to  be  scanned,  that 

is,  the  number  of  records  on  either  side 
of  a  discrepancy  to  be  scanned  -  applies 
only  to  DF-T) 

(default:  0) 

CM"  ~  compare  width  _  either  compare  columns  1 
through  cw  or  columns  cwl  through  cw2 
(default:  CW-1:133) 

ABORT*  -  abort  the  job  step  after  ac  or  more 
differences  have  been  found 

ABORT  -  same  as  ABORT- 1 
(default:  1) 

Similar  commands:  NOS/BE:  COMPARE;  COMPAR 
NOS:  VERIFY;  VFYLIB 

VMS :  DIFFERENCES 

Examples :  ACCESS , DN-one , PDN-myf i 1 e 1 . 

ACCESS , DN- t wo , PDN-myf i 1 e2 . 

COMPARE , one , t wo . 


Copy  blocked  datasets. 

Syntax:  COPYD, l-idn,0-odn, S-m. 

Parameters:  S-m  -  shift  count  (number  of  ASCII  blanks  to  be 

inserted  at  the  start  of  each  line) 
(maximum:  132) 

S  -  same  as  S-l 
(default:  0) 

Similar  commands:  NOS/BE:  COPY;  COPYF  (DTRC) ;  COPYR  (DTRC) ; 

COPYSBF;  COPYSF  (DTRC); 

COPYSR  (DTRC) 

NOS:  COPY;  COPYSBF 

VMS:  COPY 

Examples:  COPYD, I-myprog, S-25. 

A—  copy  shifted  file  to  $OUT 

(source  program  centered  on  wide 
paper) 


Copy  blocked  files. 

Syntax:  COPYF, I-idn.O-odn.NF-nf , S-m. 

Parameters:  I  0  S  -  same  as  COPYD 

NF-nf  -  decimal  number  of  files  to  copy 
(default:  1) 
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Remark* :  After  the  copy,  'both  datasets  are  positioned 

after  the  EOF  for  the  last  file  copied.  If 
BFI“0FF  is  specified  on  the  ASSIGN,  compressed 
blanks  are  expanded. 

Similar  commands:  NOS/BE:  COPYBF;  COPYCF;  COPYF  (DTRC) ; 

COPYSBF;  COPYSF  (DTRC) 

NOS:  COPY;  COPYBF;  COPYCF;  COPYSBF 

VKS:  COPY 

Examples:  COPYF, I*FT02.  < —  print  Fortran  unit  2  on 

$OUT. 


COPYR  Copy  blocked  records. 

Syntax:  COPYR, I"idn,0*odn,NR-nr ,S“m. 

Parameters:  I  0  S  -  same  as  COPYD 

NR-nr  -  decimal  number  of  records  to  copy 
(default:  1) 

Remarks:  After  the  copy,  both  datasets  are  positioned  at 

the  end  of  the  last  record  copied.  If  BFI*0FF 
is  specified  on  the  ASSIGN,  compressed  blanks  are 
expanded. 

Similar  commands:  NOS/BE:  COPYRE;  COPYS;  COPYSEL  (all  DTRC) 
Examples:  COPYR, I-myf ile,0“recs,NR»342. 


COPYU  Copy  unblocked  datasets. 

Syntax:  C0PYU,I«idn,0"odn,NS“ns. 

Parameters:  I  0  -  same  as  COPYD 

NS“ns  -  number  of  sectors  to  copy 
(default:  1) 

NS  -  copy  through  EOD 
Examples:  COPYU, I»unfyll ,0*unfyl2,NS. 


&DATA  Defines  the  beginning  of  data  within  a  procedure. 

Syntax:  &DATA,dn. 

Parameters:  dn  -  the  name  of  the  dataset  to  contain  the  data 
which  follows  this  statement 
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Remarks:  All  lines  following  an  &DATA  up  to  tbe  next  &DATA 

or  ENDPROC  are  written  to  the  specified  dataset. 

Similar  commands:  NOS/BE,  NOS:  .DATA 

VMS:  OPEN, WRITE, CLOSE 

Examples:  PROC,MYPROC. 

e  •  e 

ENDPROC. 

&DATA.IN1. 

1.73,  2.6,  4 
4.62,  9.7,  6 
0,0,0 
&DATA.IN2. 

06Test01 
12Ship  472-396X 


DEBUG  Interpret  a  dump. 

Syntax:  DEBUG , S-s  dn , L- 1 dn , DUMP-ddn , CALLS-n , TASKS , 

SYMS“sym [ : sym] ,NOTSYMS“nsym [:nsym] , 
MAXDIM-dim,BLOCKS-blk[:blk] , 
NOTBLKS-nblk [:nblk] , RPTBLKS , PAGES-np . 


Parameters:  S“  -  Debug  symbolic  tables 

(default:  $DEBUG) 


L- 

-  Listable  output 
(default:  $OUT) 

DUMP- 

-  Dump  dataset  name 

(default:  $DUMP) 

CALLS- 

-  Number  of  routine  levels  to  display 
(default:  50) 

TASKS 

-  Trace  back  through  all 
(default:  only  through 

existing  tasks 
tasks  running 

when  dump  taken) 

SYMS“  -  List  of  symbols  to  be  displayed 
(Maximum:  20  symbols) 

(default:  all  symbols) 

N0TSYMS"  -  List  of  symbols  to  be  skipped 
(Maximum:  20  symbols) 

(default:  all  symbols  displayed) 

MAXDIM"  -  Maximum  number  of  each  dimension  to  be 
displayed 

(default:  20:5:2:1:1:1:1) 

BLOCKS"  -  List  of  common  blocks  to  include 
(Maximum:  20  symbols) 

-  Include  all  cosson  blocks 


BLOCKS 
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NOTBLKS-  -  List  of  common  blocks  to  exclude 
(overrides  BLOCKS) 

(Maximum:  20  symbols) 

NOTBLKS  -  Exclude  all  but  subprogram  block 

RPTBLKS  -  Repeat  blocks  (display  with  each 
subprogram 

(default:  display  once) 

PAGES-  -  Page  limit 

(default:  70) 

Similar  coeasands:  NOS/BE,  NOS:  FTN5 , PMD 

VMS:  FORTRAN/DEBUG 


DELETE  Remove  a  permanent  dataset. 

Syntax :  DELETE ,DN-dn,NA,ERR,MSG, PARTIAL . 

DELETE, PDN-pdn, I  D-u id, OWN- owner , ED- ed,M-mn, 

NA, ERR, MSG. 

Parameters:  PARTIAL  -  delete  the  contents  of  the  file,  but 

not  the  information  about  the  file 

ED-ed  -  edition  number  (1-4095) 

unsigned  -  specific  edition 

+n  -  delete  n  highest  editions 

-n  -  keep  n  highest  editions 

ALL  -  all  editions 

(default:  highest  edition) 

Remarks:  The  first  form  is  used  if  the  permanent  file  has 

already  been  ACCESSed. 

The  second  form  does  not  ACCESS  the  file. 

Similar  commands:  NOS/BE:  ALTER;  PURGE 

VMS:  CREATE  a  new  version,  PURGE/KEEP- 1 ; 

DELETE;  PURGE 

Examples:  ACCESS, myf ile.UQ. 

DELETE, DN-myfiie, PARTIAL. 


DELETE , PDN-myf i 1 e , ALL . 


DELETE, PDN-A**. 

A —  delete  all  datasets  with 

3-character  names  starting  with 

"A" 
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DISPOSE 


t 

( 


Stage  a  dataset  to  the  front-end;  release  a  local  dataset; 
change  disposition  characteristics. 

Syntax :  DISPOSE , DN-dn , SDN-sdn , DC-dc , MF-mf , SF-s  f , ID-ui d , 

TID-tid,R-rd,W-wt,M-mn,TEXT-'text' ,DF-df, 
WAIT ! NOWAIT , DEFER , NRLS . 


Parameters:  DN-dn  -  required 


SDN-sdn  -  staged  dataset  name  (1-15  characters) 
(default:  dn;  required  for  CYBER  860) 

DC-dc  -  to  860:  DC-ST  is  required 

to  VAX:  DC-PR  with  TEXT-'any'  makes  a 
file  with  Fortran  carriage 
control;  DC-ST  (with  TEXT-'any') 
makes  a  file  with  carriage 
return  carriage  control 

SF-sf  -  special  forms  (1-8  alphanumeric 
characters) 

(default:  no  special  forms) 

DF-df  -  TR  or  CB  or  BB 
(default:  CB) 

WAIT  -  wait  or  don't  wait  until  dataset  has 

NOWAIT  been  staged  to  the  front-end 
(default:  NOWAIT) 


DEFER  -  disposition  occurs  at  end-of-job  or 
when  the  dataset  is  RELEASEd 


NRLS  -  after  disposition,  the  dataset  remains 
local  (use  WAIT) 


See  also:  MSSTORE 


Similar  commands:  NOS/BE: 


NOS: 

VMS: 


BEGIN, COMQ  (DTRC) ; 

BEGIN, XEROX  (DTRC);  ROUTE 
ROUTE 

FICHE  (DTRC);  PRINT;  XEROX  (DTRC) 


Examples:  DISPOSE, DN-out 1 , DC-PR. 

A —  to  VAX  (assumed  job  origin) 


DISPOSE , DN-out 2 , SDN-myms  s , MF-N 1 , DC-ST , A 
TEXT- 'USER, us er, pw. ,A 
' PURGE, myms s /NA. ,A 
' DEFINE, mymss. ,A 
'CTASK. ' .WAIT. 

A~  send  to  MSS 


88/10/01 


RevO 


Page  B-2? 


DISPOSE , DN-out  3 , MF- V3 , A 

TEXT- * myvax . dat ' , WAIT . 

A —  send  to  VAXcluater 


DISPOSE ,  MI-DISPLOT , DC-ST , DF-BB , TEXT- ’ p 1 o  t . dat ' , A 
WAIT. 

A--  DISSPLA  output  file  to  VAX  for 
post  processing 


DS  List  local  datasets. 

Syntax:  DS. 

Remarks:  The  infonaation  displayed  includes  alis,  size, 

position  (e.g.,  EOF),  last  operation,  and  open 
status. 

Similar  commands:  NOS:  ENQUIRE, F 

NOS/BE:  FILES 


Examples:  DS. 


DSDUMP  Dump  a  dataset  in  octal  or  hexadecimal. 


Syntax :  DSDUMP , I-idn, 0-odn , DF-df , IW-n , NW-n , IR-n , NR-n , 

IF-n , NF-n , I S-n , NS-n , 2 , DB-db , DSZ-sz . 


Parameters:  I- 


( synonym:  DN-idn) 


0-  -  dataset  to  receive  the  dump 

(default:  $0UT) 


DF-  -  dataset  format 
B  -  blocked 
U  -  unblocked 
(default:  B) 

IW-  -  decimal/octal  number  of  the  initial  word 
for  each  record/sector 
(defaults:  0  (2  specified); 

1  (2  omitted)) 

NW-  -  decimal/octal  number  of  words  to  dump 
(default:  1) 

NW  -  through  end  of  record/sector 

IR-  -  decimal/octal  number  of  the  initial  record 
for  each  input  file  -  only  if  DF-B 
(defaults:  0  (2  specified); 

1  (2  omitted)) 

NR-  -  decimal/octal  number  of  records  per  file 
to  dump  -  only  if  DF-B 
(default:  1) 

NR  -  all  records  in  each  file 
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IF~  -  decimal/octal  number  of  the  initial  file  in 
idn  -  only  if  DF-B 
(defaults:  0  (Z  specified); 

1  (Z  omitted)) 

NF“  -  decimal/octal  number  of  files  to  dump  - 
only  if  DF-B 
(default:  1) 

NF-0  -  all  files  in  the  dataset 

IS"  -  decimal/octal  number  of  the  initial 
sector  -  only  if  DF-U 
(defaults:  0  (Z  specified); 

1  (Z  omitted)) 

NS"  -  decimal/octal  number  of  sectors  to  dump  - 
only  if  DF-U 
(default:  1) 

Z  -  the  zero-base  for  the  initial-value 
parameters  (IW,  IR,  IF,  IS) 

Z  -  each  lx  is  relative  to  0; 

output  refers  to  word,  record, 
file,  and  sector  numbers  start 
at  0 

DSDUMP , . . . , IW-4096 .  is  same  as 

DSDUMP . Z ,  IW-4095 . 

no  Z  -  each  lx  is  relative  to  1 
(does  not  affect  Nx  parameters) 

DB-  -  numeric  base  for  displaying  the  data  words 
OCTAL  or  0  -  octal 
HEX  or  H  -  hexadecimal 

DSZ"  -  size  of  data  items  to  dump 

WORD  or  W  -  words  (64  bits) 

PARCEL  or  P  -  parcels  (16  bits) 

(default:  WORD) 

Similar  commands:  NOS/BE:  PRUDUMP;  TAPDMP9;  TDUMP  (all  D^RC) 
NOS:  TDUMP 

Examples:  DSDUMP , I-my f i 1 e , NW-25 , NR-5 , DB-H . 

* —  hexadecimal  dump  of  first  25 
words  of  first  5  records  of 
MYFILE 


Display  job  information  previously  captured  by  DUMPJOB. 

Syntax:  DUMP, I-idn,0-odn,FWA-fwa,LWA-lwa, JTA,NXP,V, DSP, 

FORMAT- f, CENTER. 

Parameters:  I"  -  dataset  containing  the  memory  image 

(default:  $DUMP) 
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FWA“  -  first  word  address  to  dump 

(default:  word  0  of  Job  Communication 
Block  (JCB)) 

LWA-  -  last  word  address  to  dump 
(default:  200  of  JCB) 

LWA  -  the  limit  address 

LWA“0  ~  no  memory 

JTA  -  dump  Job  Table  Area 

(default:  no  JTA  dump) 

NXP  -  dump  No  Exchange  Package,  B,  T,  cluster, 
and  semaphore  registers 
(default:  these  are  dumped; 

NXP  overrides  V  if  both 
specified) 

V  -  dump  vector  registers 

(default:  do  not  dump  vector  registers) 

DSP  -  dump  Logical  File  Tables  (LFTs)  and 
Dataset  Parameter  Tables  (DSPs) 

(default:  do  not  dump  LFTs  and  DSPs) 

FORMAT*  -  format  for  dumping  FWA  through  LWA 


D  -  data 

-  decimal  integer  and  ASCII 

G  -  data 

-  floating-point  or 
exponential  and  ASCII 

I  -  instr 

-  CAL  mnemonics  and  ASCII 

M  -  data 

-  each  16-bit  parcel 

displayed  as  1  hex  and  A 
octal  digits 

C  -  data 

-  octal  integer  and  ASCII 

P  -  data 

-  16-bit  parcel 

X  -  data 

-  hex  integer  and  ASCII 

CENTER  ~  dump  100  (octal)  words  on  each  side  of 
P-register  address  in  P  format 

Similar  commands:  NOS/BE,  NOS:  DMD,  DMP 

Examples:  See  DUMP JOB. 


Capture  job  information  in  dataset  $DUMP  for  display  by  DUMP. 

Syntax:  DUMP JOB. 

Examples:  ... 

EXIT. 

DUMP JOB. 

DUMP . 

DUMP . 
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ECHO  Control  logfile  messages. 

Syntax:  ECHO.ON-classl: . . . :classm,OFF-classl: . . . tclassn 

Parameters:  ON*  -  list  of  classes  whose  messages  are  to  be 

written  to  the  log  file 
C'ON’'  is  the  same  as  "ON-ALL") 

OFF-  -  list  of  classes  whose  messages  are  NOT  to 
be  written  to  the  log  file 
("OFF"  is  the  same  as  "OFF-ALL") 

class i  ~  ABORT  -  job  failure 

JCL  ~  messages  in  user's  JCL 

PDKERR  -  PDM  errors 

PDMINF  -  PDM  dataset  information 

ALL  -  all  classes 

Remarks:  The  ECHO  state  after  returning  from  a  procedure 

call  is  the  same  as  before  the  call,  regardless 
of  any  changes  made  in  the  procedure. 

Within  a  procedure,  the  ECHO  state  is  that  of  the 
caller,  unless  changed  within  the  procedure. 

Similar  commands:  NOS/BE:  DAYFILE 

Examples:  ECHO, OFF. 


ELSE  See  IF. 

ELSEIF  See  IF. 

ENDIF  See  IF. 

ENDLOOP  See  LOOP. 


ENDPROC  See  PROC. 
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EXIT  On  job  abort,  proceasing  continues  with  the  stateaent  following 
the  EXIT;  if  no  abort,  terminate  job  processing. 

Syntax:  EXIT. 

Similar  commands:  NOS/EE,  NOS:  EXIT 

VMS:  ON  condition 

Examples:  ... 

EXIT. 

DUMP JOB. 

DUMP. 


EXITIF  See  IF. 


EXITLOOP  See  LOOP. 


FETCH  Get  a  front-end  dataset  and  make  it  local. 

Syntax:  FETCH, DN-dn,SDN-sdn,AC-ac, TEXT-'text' ,MF-mf, 

DF-df. 

Parameters:  ON-  -  local  dataset  name 

SDN-  -  staged  dataset  name  (front-end  dataset 
name) 

(default:  dn) 

AC-  -  acquisition  code  (where  the  dataset  is  to 
be  acquired) 

IN  -  input  (job)  dataset  -  use  SUBMIT 
to  run  the  job 

IT  -  intertask  communication 
MT  -  magnetic  tape  at  the  front  end 
ST  -  staged  dataset  from  the  front  end 
(default:  ST) 

MF-  -  mainframe  computer  identifier 
N1  -  MSS 
V3  -  DT3 

(default:  front  end  of  job  origin) 

DF-  -  dataset  format  (BB,  BD,  CB,  CD,  TR) 
(default:  CB) 

Remarks:  FETCH  defaults  to  DF-CB,  MSFETCH  defaults  to 

DF-TR. 


See  also 


MSFETCH 
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Similar  commands:  NOS/BE:  MSFETCH  (get  an  MSS  file,  DTRC) 

VMS:  HFT  FETCH  (get  an  MSS  file,  DTRC) 

Examples:  FETCH, DN-SOURCE, TEXT-' PROG. FOR' . 


FETCH , DN-FT1 1 , DF-TR , A 

TEXT-' [ABCD.SUBD13CRAYBIN.DAT' . 

A —  binary  data  file  from  a  VAX 
subdirectory  of  user  ABCD 


FETCH , DN-SORC , SDN-as  sname , MF-N 1 , A 
TEXT- ' USER , name , pw. A 

' GET.mssname.CTASR. ' . 

A —  get  an  indirect  MSS  (860)  file 


FLODUMP  Dump  flowtrace  table  of  a  prograa  abort. 

Syntax:  FLODUMP, L-ldn. 

Parameters:  L-  -  dataset  to  contain  the  report 
(default:  $OUT) 

Examples:  ... 

EXIT. 

DUMP JOB. 

FLODUMP. 


FTREF  Generate  Fortran  cross-reference. 

Syntax :  FTREF ,I-idn, L-ldn, CB-op , TREE- op , ROOT-root , 

END-end , LEVL-n , DIR-di r , NORDER , MULTI . 

Parameters:  I-  -  input  dataset  containing  the  cross- 

reference  table  listing  and  Fortran 
source  program  (ON-XS) 

CB-  -  global  common  block  cross  references 

PART  -  routines  using  a  common  block 
FULL  -  use  of  common  block  variables 
NONE  -  no  output  information 
(default:  PART) 

TREE-  -  static  calling  tree 

PART  -  entry  names,  external  calls, 

calling  routines,  cosnson  block 

names 

FULL  -  PART  plus  static  calling  tree 
NONE  -  no  output  information 
(default:  PART) 
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ROOT- 


if  TREE"FULL,  this  defines  the  nane  of 
the  routine  to  be  used  as  the  root  of 
the  tree 

(default:  the  routine  not  called  by  any 
other  routine; 
if  more  than  one,  the  first 
alphabetically) 


END*  -  if  TREE*FULL,  this  defines  the  name  of 

the  routine  to  be  used  as  the  end  of  any 
branch  of  a  tree 

(default:  complete  trees  are  generated) 


LEVEL*  -  if  TREE*FULL,  this  is  the  maximum  length 
of  any  branch 

(default:  the  entire  program) 


DIR*  -  dataset  containing  processing  directives 
(default:  no  directives) 


NORDER  -  list  subprograms  in  input  order 

(default:  list  in  alphabetical  order) 

MULTI  -  summarize  multitasking  subroutine  usage 


Directives:  The  following  may  be  in  the  DIR*  dataset: 

ROOT  -  list  of  modules  to  be  used  as  roots 
of  separate  trees 

ROOT,mdl ,md2, . . . ,mdn. 

SUBSET  -  list  of  modules  to  be  processed 
SUBSET ,mdl,md2, . . . ,mdn. 

(default:  all  modules) 

CHKBLK  -  list  of  common  blocks  to  be  checked 
for  locked  variables 

CHKBLK, blkl,blk2, . . . ,blkn. 

CHKMOD  -  list  of  external  calls  to  be  checked 
for  calling  from  a  locked  area 
CHKMOD, modi ,mod2, . . . , modn. 


Similar  commands:  NOS/BE,  NOS:  FTN5.LO- 

VMS:  FORTRAN  / CRCSS_REFERENCE 


HOLD  Specify  that  dataset  release  occurs  with  implicit  HOLD. 
Syntax:  H0LD,GRN*grn. 

Parameters:  GRN*grn  -  generic  resource  name 
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IF 


Remarks : 


See  also: 


This  prevents  return  of  resources  to  the  system 
and  is  useful  when  dataset  assignment  is  done  by 
applications  over  which  the  user  has  no  control. 

NOHOLD 


Begin  a  conditional  block  of  code. 


Syntax:  IF (express  ion) 

<do  if  true> 

ELSEIF (express ion) 

<do  if  true> 

ELSE. 

<do  if  all  other  tests  fail> 
ENDIF. 


Parameters: 


EXITIF. 

EXITIF (express ion) 


-  exit  unconditionally 

-  exit  if  exp  is  true 


exp  -  a  valid  JCL  expression 


Remarks : 


Literal  strings,  in  an  IF/ELSEIF 

®*pression  are  limited  to  8  characters  (one 
machine  word) . 


Similar  commands:  NOS/BE:  IFE 

NOS:  IF;  IFE 

VMS:  IF 


Examples:  ACCESS, DN-MYPROG.NA. 

IF(PDMST.NE.l) 

UPDATE (Q-MYPROG) 

CFT(l-$CPL,ON-A) 

NOTE (DN-SLIN, TEXT- ' ABS-MYPROG ' ) 

*  create  input  directive 
file  for  SEGLDR 

SEGLDR(I-SLIN) 

SAVE (DN-MYPROG.NA) 

EXITIF. 

EXIT. 

*.  Error  while  generating  MYPROG 

EXIT. 

ENDIF. 

MYPROG. 
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10 AREA 


I TEMIZE 


Sane  as  above,  but  in  a  procedure,  with  SEGLDR 
directives  in  a  data  file  in  the  procedure: 

PROC. 

DOMYPROG. 

•••  < —  onit  NOTE  command 

ENDPROC. 

&DATA.SLIN 
•  •  • 

ABS-MYPROG 


Control  access  to  a  job's  I/O  area  (containing  the  DSP  and  I/O 
buffers) . 

Syntax:  IOAREA,  {  LOCK  j  UNLOCK  } 

Parameters:  LOCK  -  the  limit  address  is  set  to  the  base  of 

the  DSPs,  denying  direct  access  to  the 
user's  DSP  and  I/O  buffers.  When 
locked,  system  I/O  routines  can  gain 
access . 

UNLOCK  -  the  limit  address  is  set  to  JCFL, 
allowing  access  to  these  areas. 


Examples:  IOAREA, LOCK. 


Report  statistics  about  a  library  dataset. 

Syntax:  ITEMIZE, DN-dn,L-ldn,NREW,MF-n,T,BL,E,B,X. 

Parameters:  DN«  -  (default:  $OBL) 

NREW  -  no  rewind 

(default:  rewind  before  and  after) 

NF*  -  number  of  files  to  be  listed 
(default:  1) 

NF  -  all  files 

T  -  truncate  lines  after  80  characters 

(if  specified,  E,  B,  k  may  not  be  used) 

BL  -  burstable  listing  (each  heading  is  at  top 
of  a  page 

(default:  page  eject  only  when  current 
page  is  nearly  full) 

8  ~  list  all  entry  points  (binary  library 

datasets  only) 

®  “  8  plus  code  and  common  block  information 

(B  overrides  E) 


,#*'WpkJk  kjwi 
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X  -  B  plus  external  information 
(X  overrides  B) 

Restrictions:  .  an  UPDATE  PL  is  recognized  only  if  it  is  the 
only  item  in  a  dataset 
.  standard  COS  blocked  datasets  only 

Similar  commands:  NOS/BE:  ITEMIZE;  LISTBIN  (DTRC) 

NOS:  ITEMIZE 

VMS:  LIBRARIAN 

Examples:  ITEMIZE, DN-myreloc 

ITEMIZE ,DC-mylib,X. 


JOB  First  statement  of  a  job  -  gives  job  parameters. 

Syntax :  JOB , JN- j  n , MFL-f 1 , T- 1 1 , OLM-o lm , US- j  cn . 

Parameters:  JN-jn  -  job  name  (1-7  alphanumeric  characters) 

MFL-fl  -  maximum  field  length  (decimal)  for  the 
job  -  fl  is  rounded  up  to  the  nearest 
multiple  of  512  words,  or  the  amount 
needed  to  load  CSP  (Control  Statement 
Processor) 

(default:  512000) 

MFL  -  the  system  maximum  (3,536,000) 

T-tl  -  job  time  limit  (decimal  seconds) 
(default:  30;  max:  200000) 

T  -  the  system  maximum  (~194  days!) 

NOTE:  your  job  will  not  run  because 
this  exceeds  the  DTRC  maximum! 

OLM-olm  -  maximum  size  of  $OUT;  olm  is  the 

number  of  512-word  blocks  (each  block 
holds  about  45  lines) 

(default:  2000;  maximum:  8192) 

US-jcn  -  job  class  (1-7  alphanumeric  characters) 
jcn  is  one  of: 

EXPRESS,  NORMAL,  DEFER,  SECURE 
Job  is  dropped  to  a  lower  class  if  it 
doesn't  fit  the  requested  job  class, 
(default:  NORMAL,  if  it  fits) 

(see  page  2-1-3  for  the  job  class 
limits) 

See  also:  ACCOUNT 

Similar  commands:  NOS/BE,  NOS:  job  statement 
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Examples:  JOB, JN-jobnamel. 

ACCOUNT,.... 
<rest  of  job> 


JOBCOST  (DTRC  -  UTILITY)  Write  a  summary  of  the  job  coat  and  system 
usage  to  $L0G. 

Syntax :  JOBCOST 

Remarks:  A  subroutine  version  is  available  in  DTLIB. 

Similar  cosuunds:  NOS/BE:  SUMMARY 

Exaapl es :  ACCESS , DN-UTILITY , OWN-PUBLIC . 

LIBRARY , DN-UTILITY : * . 

JOBCOST.  < —  the  cost  to  this  point  in  job 

<  execute  your  program  > 

JOBCOST.  < —  the  cost  of  running  your  program 


LIBRARY  Specify  the  library  dataset  search  order  for  control  statement 
verbs . 

Syntax:  LIBRARY,DN-dnl:dn2: . . . :dn64, V. 

Parameters:  DN-  -  up  to  64  library  names  to  be  searched  -  an 
asterisk  means  add  the  listed  names  to  the 
current  searchlist 

V  -  list  the  current  library  searchlist  in  the 
logf ile 

Similar  commands:  NOS/BE,  NOS:  LIBRARY;  LDSET , LIB-  (not  subs) 

Examples:  LIBRARY , DN-THISLIB : YOURLIB . 

A —  the  searchlist  contains 

2  libraries 

LIBRARY, DN-THATLIB :*, V . 

A —  the  searchlist  now  has 

3  libraries  and  are 
listed  in  the  logfile 

LIBRARY,, V.  < —  list  the  current 

searchlist  in  the  logfile 


LOOP  Start  of  an  iterative  control  statement  block. 
Syntax:  LOOP. 

e  e  e 

EXITL00P. 

EXITLOOP (express i on) 

e  e  e 

ERDLOOP. 

Parameters:  exp  -  a  valid  JCL  expression 
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Similar  commands:  NOS/BE,  NOS:  WHILE 

Examples:  Herge  two  datasets  £or  60  records: 

SET.Jl-O. 

SET.J2-60. 

LOOP. 

EXITLOOP (J2.EQ.0) 

IF(Jl.EQ.O) 

COPYR , I-DSIN1 , O-OUTDS . 
SET.Jl-l. 

ELSE. 

COPYR , I-DSIN2 , O-OUTDS . 

SET, Jl-0. 

ENDIF. 

SET, J2-J2-1. 

ENDLOOP. 

REWIND , DN-DS IN 1 : DS IN2 : OUTDS . 


MEMORY  Request  new  field  length. 

Syntax:  MEMORY. 

MEMORY, FL-fl. 

MEMORY, FL-f 1, {  USER  J  AUTO  }. 

Parameters:  FL-fl  -  the  decimal  number  of  words  of  field 

length;  "FL"  allocates  the  job  maximum 

USER  -  field  length  is  retained  until  the  next 
request 

AUTO  -  field  length  is  reduced  automatically  at 
the  end  of  each  job  step 

Similar  commands:  NOS/BE:  RFL 
NOS:  MFL 

Examples:  MEMORY, FL, USER.  < —  get  and  hold  the  maximum 

field  length 

MEMORY, AUTO.  < —  resume  automatic  mode 

(FL  reduces  after  next  job 
step) 

MEMORY, FL-32978.  <—  get  and  hold  32978  words 

(user  mode) 

MEMORY , FL-32978 , AUTO . 

* —  get  32978  words  for  next 
job  step  only 


MODE 


Set/clear  mode  flags. 


Syntax: 


HOIK , Fl-opt i on , BT-op  t i on , EMA-opt i on , AVL-op t i on , 
ORI-option. 


Parameters:  option  -  ENABLE  or  DISABLE 

FI  -  floating-point  error  interrupts 
(default:  ENABLE) 
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MODIFY 


MSACCES 


BT  -  bidirectional  memory  transfers 

(default:  ENABLE) 

EMA  -  extended  aeaory  addressing 

(default:  DISABLE) 

AVL  -  second  vector  logical  function  unit 
(default:  DISABLE) 

ORI  -  operand  range  error  interrupt 

(default:  ENABLE) 


Siailar  coaaands:  NOS/BE,  NOS:  MODE 

VMS:  ON  condition 


Change  a  permanent  dataset's  characteristics. 

Syntax :  MODIFY , DN-dn , PDN-pdn , ID-ui d , ED-ed , RT-r t , R-rd , 

W-wt , M-an , NA , ERR , MSG , EXO-exo , PAM-aode , ACN . 

Parameters:  RT*rt  -  new  retention  period 

RT*  -  reset  to  default 

ACN  -  use  the  alternate  account  number 

See  also:  ALTACN.  SAVE 

Similar  coaaands:  NOS/BE:  RENAME 
NOS:  CHANCE 

VMS:  SET  PROTECTION 


Exaaples:  ACCESS,  DN-ay  local , PDN-aypera,UQ,M-aaint . 

MODIFY , DN-ay 1 ocal , PAM-R . 


(DTRC  -  PROCLIB)  Supply  your  Usemaae  and  password  to  the  Mass 
Storage  Systea. 

Syntax:  MSACCES, US-us,MPW-apw. 

Paraaeters:  UN-us  -  your  Usernaae  (User  Initials) 

MPW-apw  -  your  MSS  password 

Reaarks:  MSACCES  is  required  before  using  the  MSx  coaaands. 

Siailar  coaaands:  NOS/BE:  MSACCES  (DTRC) 

VMS:  HFT  ACCESS  (DTRC) 

Exaaples:  ACCESS .DN-PROCLIB, OWN-PUBLIC. 

LIBRARY , DN-PROCLIB :* . 

MSACCES, UN-ayid,MPW-nyasspw. 

MS  FETCH, _ -or-  MS  PURGE .  -or-  MSSTORE, - 
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MS FETCH 


MSPURGE 


(DTRC  -  PROCLIB)  Fetch  a  file  froa  the  Mass  Storage  System. 

Syntax :  MSFETCH , DN-dn , MDN-mdn , DF-df , UN-un , PW-pw . 

Parameters:  DN-dn  -  the  local  dataset  name 

MDN-mdn  ~  the  MSS  dataset  (file)  name 
(default:  MDN-dn) 

DF-df  -  data  format 

TR  -  transparent  (no  conversion) 

CB  -  character  blocked  (convert  from 
CDC  display  code) 

(default:  DF-TR) 

UN-un  _  Username  (User  Initials)  of  the  owner 
of  the  MSS  file 
(omit  for  your  own  files) 

PW-pw  -  optional  MSS  file  password 

Remarks:  MSACCES  is  required  before  using  the  MSx  commands. 

MSFETCH  defaults  to  DF-TR,  FETCH  defaults  to 
DF-CB. 

See  also:  ACQUIRE,  FETCH 

Similar  commands:  NOS/BE:  MSFETCH  (DTRC) 

NOS:  ATTACH 

VMS:  HFT  FETCH  (DTRC) 

Examples :  ACCESS , DN-PROCLIB , OWN-PUBLIC . 

LIBRARY , DN-PROCLIB : * . 

MSACCES , UN -my i d , MPW-myms  s  p w . 

MSFETCH, DN-inl,MDN-mymsfyl. 

MSFETCH , DN- i n2 , MDN-hi s f yl , UN-him , DF-CB , PW-f y 1 epw . 

INI  is  your  file  MYMSFYL  transferred  without 
conversion. 

IN2  is  file  HISFYL  belonging  to  user  HIM 
converted  from  CDC  Display  Code  (FYLEPW  is  the 
password  HIM  requires  for  access  to  the  file). 


(DTRC  ~  PROCLIB)  Purge  a  file  from  the  Mass  Storage  System. 
Syntax:  MSPURGE, MDN-mdn. 

Parameters:  MDN-mdn  -  the  MSS  dataset  (file)  name 

(default:  MDN-dn) 


Remarks: 


MSACCES  is  required  before  using  the  MSx  commands. 
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MSSTORE 


Similar  commands: 


NOS/BE: 

NOS: 

VMS: 


MSPURGE  (DTRC) 

PURGE 

HFT  DELETE;  MSSDELETE  (both  DTRC) 


Examples :  ACCESS , DN-PROCLIB , OWN-PUBLIC . 

LIBRARY , DN-PROCLIB : * . 

MSACCES , UN-my i d, MPW-myms  spw . 
MSPURGE,MDN-mssfyll. 


(DTRC  -  PROCLIB)  Store  a  file  on  the  Mass  Storage  System. 
Syntax :  MSSTORE , DN-dn , MDN-mdn , DF-df , CT-c t , NA-na , PW-pw . 


Parameters:  DN-dn  -  the  local  dataset  name 


MDN-mdn  -  the  MSS  dataset  (file)  name 
(default:  MDN-dn) 

DF-df  -  data  format 

TR  -  transparent  (no  conversion) 

CB  -  character  blocked  (convert  from 
CDC  display  code) 

(default:  DF-TR) 

CT-ct  -  Category 

P  -  private 
PU  -  public 
S  -  semi-private 
(default:  CT-P) 

NA-na  -  No  Abort 

0  -  abort  if  file  already  exists  on 
the  MSS 

1  -  replace  the  olf  MSS  file,  is  one 

exists 

(default:  NA-0) 

PW-pw  -  optional  MSS  file  password 
Remarks:  MSACCES  is  required  before  using  the  MSx  commands. 


See  also:  DISPOSE 

Similar  commands:  NOS/BE:  MSSTORE  (DTRC) 

NOS:  DEFINE 

VMS:  HFT  STORE  (DTRC) 

Examp 1 es :  ACCESS , DN-PROCLIB , OWN-PUBLIC . 

LIBRARY , DN-PROCLIB :* . 

MSACCES , UN-my i d , MPW-myms s pw . 

MSSTORE , DN- ini , MDN-ms s f y 1 1 . 

MSSTORE , DN- i n2 , KDN-ms ■ fyl 2 , DF-CB , NA- 1 , PW- fy 1 epw . 


INI  is  stored  as  private  file  MSSFYLl. 
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NEWCHRG 


NOHOLD 


IN2  is  stored  as  private  file  MSSFYL2  (even  is 
MSSFYL2  already  exists)  in  CDC  Display  Code. 
FYLEPW  is  the  password  required  for  another  user 
to  access  the  file. 


(DTRC  -  PROCL1B)  Change  permanent  file  account  number. 

Syntax:  NEWCHRG, OLD-oldehrgno, ID- id. 

Parameters:  OLD-  -  the  account  number  to  be  changed 

ID-id  ~  change  all  files  having  this  ID 
ID  -  change  all  files  having  a  null  ID 
(default:  change  all  IDs) 

Remarks:  NEWCHRG  changes  from  the  specified  account  number 

to  the  "current"  number  of  the  Cray  job  (from  the 
ACCOUNT  or  most  recent  ALTACN  statement). 


See  also:  ATLACN. 

Similar  commands:  NOS:  BEGIN , NEWCHRG 

NOS/BE:  BEGIN, RENANAC 

Examples:  JOB.JN-.... 

ACCOUNT, AC- _ 

ACCESS , DN-PROCLIB , OWN-PUBLIC . 

LIBRARY , DN-PROCLIB :* . 

NEWCHRG , OLD- 1 222233344 . 

A —  change  all  files  from  account 
1~2222~333~44  to  the  current  one 


NEWCHRG, OLD-1222233344, ID-myid. 

A—  change  all  files  WITH  ID-MYID 
from  account  1-2222-333-44  to 
the  current  one 


e  a  e 

ALTACN, AC-5666677788. 

NEWCHRG, OLD- 12222433344 . 

A —  change  all  files  from  account 
1-2222-333-44  to  5-6666-777-88 


Cancel  the  effect  of  HOLD. 

Syntax:  NOHOLD, GRN-grn. 

Parameters:  GRN-grn  -  generic  resource  name 
See  also:  HOLD 
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NORERUN 


NOTE 


OPTION 


Control  a  job'*  rerunability. 

Syntax:  NORERUN .option. 

Parameters:  option  -  ENABLE  -  declare  a  job  nonrerunable  if 

any  of  the  nonrerunable 
functions  are  done 

DISABLE  ~  stop  monitoring  nonrerunable 
functions  (if  a  job  has 
already  been  declared 
nonrerunable,  that  status  is 
not  changed) 

(default:  ENABLE) 


See  also:  RERUN 

Similar  commands:  NOS/BE:  NORERUN  (DTRC) 
NOS:  NORERUN 

Examples:  NORERUN .DISABLE. 


Write  text  to  a  dataset. 

Syntax:  NOTE, DN-dn, TEXT-' text  * . 

Parameters:  DN-  -  the  dataset  to  be  written  (at  its  current 

position) 

DN  -  write  to  $OUT 

TEXT-  -  up  to  153  character  to  be  written 

Similar  commands:  NOS/BE:  NOTE  (DTRC) 

NOS:  NOTE 

VHS:  OPEN, WRITE, CLOSE 

Examples:  NOTE , DN-U IN , TEXT- ' *COMP I LE  myprog.mysub' . 

REWIND, UIN. 

UPDATE, I-U IN . 


Specify  user-defined  options. 

Syntax:  OPTION, LPP-n,PN-{  p  \  ANY  } ,STAT-3tat. 

Parameters:  LPP-n  -  number  of  lines  per  page  for  job 

listings  (0-255  decimal) 

LPP-0  -  do  not  change  the  current  setting 
(default:  66) 

PN-p  -  select  a  processor  (p  is  1  or  2) 
PN-ANY  -  any  available  processor 

(if  invalid,  job  aborts  with  an  error 

massage) 

(default:  ANY) 
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STAT-  -  the  level  of  I/O  statistics  gathered 
for  local  datasets  to  appear  in  the 
user  logfile 

(user  level  -  accounting  information 
system  level  -  device  information) 

ON  -  installation  defined 
OFF  -  no  statistics 
USR  -  user  information 
FULL  -  user  and  system  info 
(default:  OFF) 

STAT  -  same  as  STAT-ON 

Similar  commands:  VMS:  SUBMIT  /QUEUE- 


PASCAL  Compile  a  Pascal  source  program. 

Syntax:  PASCAL  ,I”idn,L“ldn,B’*bdn,0”list, 

CPU-cpu:char. 

Parameters:  B-  -  generated  binary  load  modules 

(default:  $BLD) 

0 -  -  Compiler  options,  separated  by  colons 

(def aul t :  A- : BP- : BREG-8 : BT- : C- : EH-  :H2 : A 

H+24:L+:0+:P-:R+:RV-;S4:S+4:A 

ST- : T+ : TREG-8 : U- : V+ : X- : 2+) 

CPU-  -  Cray  to  execute  the  program 
cpu  -  CRAY-XKP 

CRAY-Xl  ~  single-processor 
CRAY-X2  ~  dual-processor 
(default:  the  compiling  machine) 

char  -  [N0]EMA  -  extended  memory 

(24-bit  A-register 
immediate  loads; 
common  blocks  >  4 
million  words) 

[N0]CIGS  -  compressed  index 
seatter/gsther 

tNO] VPOP  -  vector  population 
and  parity 

[NOjREADVL  -  vector  length  read 
instructions 

KEMSIZE-nR  -  (n  *  1024)  words 
KEHSIZE-nH  -  (n  *  1048576)  words 
[N0]BDM  -  bidirectional  memory 

Similar  commands:  NOS/BE,  NOS,  VMS:  PASCAL 

Exas^les:  PASCAL, I-mypasc. 
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PERMIT 


PRINT 


PROC 


Grant/deny  access  to  a  peraanent  dataset. 

Syntax:  PERMI T , PDN-pdn , ID-u i d , AM-aa , RP , USER-ov , ADN-adn , 

NA, ERR, MSG. 

Parasieters:  PDN-pdn  -  required 

RP  -  reaove  the  peraissions 

USER-ov  -  the  naae  (User  Initials)  of  the  user  to 
be  granted/denied  peraission 

ADN-adn  -  local  dataset  with  the  permit  list 

Siailar  coaaands:  NOS/BE:  MSCHANG;  MSPERMT  (both  DTRC) 

NOS:  CHANGE;  PERMIT 

VMS:  SET  PROTECTION;  Access  Control  List 

Exaaples :  PERMIT . PDN-ay f i 1 e , USER-abcd . AM-R . 

A —  aake  file  readonly  for  user  ABCD 


PERMIT , PDN-ayf i 1 e , USER- abed , AM-N . 

A —  reaove  all  peraissions  for  user 
ABCD 


Hrite  the  value  of  a  JCL  expression  to  the  logfile. 

Syntax:  PRINT(expression) 

Paraaeters:  exp  -  any  valid  JCL  expression 

(aaxiaua  length:  8  characters) 

Logfile  format:  UT060  deciaal  octal  ASCII 

Siailar  coaaands:  NOS/BE,  NOS:  DISPLAY 

VMS:  HRITE  SYSSOUTPUT 

Exaaples:  SET(J1-J1+1) 

PRINT, Jl. 


Begin  an  in-line  procedure  definition  block.  This  is  followed 
by  the  procedure  prototype  stateaent  which  naaes  the  procedure 
and  gives  the  formal  paraaeter  specifications. 

Syntax:  PROC. 

naae, pi, p2, . . . ,pn 

e  e  e 

ENDPROC. 

Paraaeters:  naae  -  the  naae  of  the  procedure  (1-8  alpha- 

nuaeric  characters;  should  not  be  the  saae 
as  a  systea  verb) 
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pi  -  a  formal  parameter  specification  in  one 
of  the  following  formats: 

pos  ~  positional 

key*dvalue:kvalue  -  keyword 

key  -  formal  keyword  parameter 
dvalue  -  optional  default  value  if 
the  parameter  is  omitted 
kvalue  -  optional  value  if  the 

parameter  is  specified  with 
no  value 
special  cases: 

key*  -  specify  a  null  value 
key*:  -  no  defaults,  but  caller  may 
specify  key*  or  just  key 


See  also:  Section  2-3 

Similar  commands:  NOS/BE,  NOS:  .PROC 

VMS:  always  8  parameters 


Examples:  PROC. 

•  •  e 

ENDPROC. 


QUERY  Determine  the  current  status  and  position  of  a  local  file. 

Syntax :  QUERY , DN-dn , STATUS-s  t atus , POS-pos . 

Parameters:  STATUS*  -  the  JCL  symbol  name  to  receive  the 

status  of  the  dataset  -  return  values: 

value  meaning 


-1  dn  is  not  local 

0  dn  is  closed 

1  dn  is  open  for  output 

2  dn  is  open  for  input 

3  dn  is  open  for  I/O 

POS*  -  the  JCL  symbol  name  to  receive  the 

position  of  the  dataset  -  return  values 

value  meaning 

-1  position  indeterminate 

(not  local,  unblocked,  closed) 
0  BOD  (beginning-of-data) 

1  EOD  (end-of-data) 

2  EOF  (end-of-file) 

3  EOR  (end-of-record) 

4  mid-record 
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RELEASE 


RERUN 


Remarks:  In  addition,  a  logfile  message  is  generated: 

QU001  -  DN:  ldn  STATUS:  status  POS:  pos 

where  status  is  UNKNOWN,  CLOSED,  OPEN-O,  OPEN-I, 
OPEN- I/O 

pos  is  N/A,  BOD,  EOD,  EOF,  EOR,  MID 

Similar  commands:  NOS/BE:  FILES 

NOS:  ENQUIRE 

VMS:  no  local  file  concept 

Examp 1 es :  QUERY , DN-my f i 1 e , STATUS- s  t a t , POS-pos . 

IF (STATUS. LT.O) 

COMMENT,  file  myfile  is  not  local 

e  e  e 

ELSE. 

COMMENT,  file  myfile  is  local 
ENDIF. 


Return  a  dataset. 

Syntax:  RELEASE, DN-dnl:dn2: . . . : dn8 , HOLD. 

Parameters:  DN-  -  up  to  8  dataset  names 

HOLD  -  hold  generic  resource  (do  not  return  the 
allocation  to  the  system  pool) 

See  also:  HOLD,  NOHOLD 

Similar  commands:  NOS/BE,  NOS:  RETURN 

Examp 1 es :  RELEASE , DN-temp : f i 1 e 1 : out . 


Control  a  job's  rerunability. 

Syntax:  RERUN, option. 

Parameters:  option  -  ENABLE  -  mark  job  as  rerunable 

regardless  of  any 
nonrerunable  functions 
which  may  have  been 
performed  so  far  in  the  job 
DISABLE  -  mark  the  job  as  nonrerunable 
(default:  ENABLE) 


See  also:  NORERUN 

Similar  commands:  NOS/BE:  NORERUN  (DTRC) 
NOS:  NORERUN 


Examples 


RERUN, ENABLE 
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RETURN  Return  control  from  a  procedure  to  its  CALLer. 

Syntax:  RETURN. 

RETURN, ABORT. 

Paraaeters:  ABORT  -  cause  COS  to  iaaue  a  job  step  abort 

Siailar  coaaands:  NOS/BE,  NOS:  REVERT 
VMS:  EXIT 

Exaaples:  See  PROC. 

REWIND  Position  a  dataset  at  its  beginning. 

Syntax:  REWIND,DN-dnl:dn2: . . . :dn8. 

Paraaeters:  DN~  -  up  to  8  datasets  to  be  rewound 
Siailar  coaaands:  NOS/BE,  NOS:  REWIND 
Exaaples:  REWIND,DN-teap:out:inl. 

R0LLJ0B  Protect  a  job  by  writing  it  to  disk. 

Syntax:  ROLL JOB. 

Reaarks:  There  is  no  guarantee  that  a  job  will  remain 

recoverable. 

Exaaples:  ROLL JOB. 

SAVE  Make  a  local  dataset  permanent  and  define  its  characteristics. 

Syntax :  SAVE ,  DN“dn ,  PDN“pdn ,  ID-ui d ,  ED-ed ,  RT-r  t , R-rd ,  W-wt , 

M-an ,  UQ ,  NA ,  ERR ,  MSG ,  EXO-exo ,  PAM“mode , 

ADN-adn, ACN. 

Paraaeters:  RT-rt  -  retention  period 
RT-  -  set  to  default 

ADN-adn  -  local  dataset  with  the  permit  list 

ACN  -  use  the  alternate  account  number 

See  also:  ALTACN ,  MODIFY 

Siailar  coaaands:  NOS/BE:  CATALOG 

NOS:  DEFINE;  SAVE 

VMS:  CREATE 
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SCRUBDS 


SEGLDR 


Example* :  SAVE , DN-out , PDN-ABCOUT . 


SAVE ,  DN-prog ,  PDN"mas  tprog ,  M*main t ,  PAM-R . 

A —  the  file  is  world-readable  and 
YOU  can't  accidentally  delete  it 


Write  over 
Syntax: 

Parameters 

Remarks : 
Examples: 


a  dataset  before  release. 

SCRUBDS , DN" 1 f n . 

lfn  -  the  uniquely  accessed  file  to  be 
overwritten 

SCRUBDS  writes  zeros  over  an  existing  dataset. 

ACCESS , DN-myf y 1 , PDN-myfyl e , UQ . 

SCRUBDS, DN-myfyl. 


Segment  loader. 

Syntax:  SEGLDR, I~idn,LBldn,DW»dw,CMI>' directives  1 ,GO. 


Parameters:  I* 

I 


-  Dataset  with  SEGLDR  directives 
(default:  $IN) 

-  Same  as  I-$1N 


L“  -  Listable  output 
(default:  $OUT) 
L  -  Same  as  L-SOUT 


DW-  -  Input  directive  data  width 
DW  -  Same  as  DW-80 
(default:  80) 


CUD-  -  Global  directives  to  be  processed; 

treated  as  first  record  read  from  I-idn; 
separate  commands  with  semicolons 
(e.g.,  CMD-'BIN-bdn; MAP-PART') 


GO  -  Load  and  execute; 

ignored  for  a  segmented  load 


Remarks:  By  default,  input  load  modules  are  read  from  $BLD. 


Directives:  See  section  2-6. 


Similar  commands:  NOS/BE,  NOS:  SEGLOAD 

VMS:  virtual  machine 


Examples:  CFT,B*myobj. 

SEGLDR, CMD-’BIN-myobj; MAP-PART’ ,GO. 
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SET  Chang*  the  value  of  a  JCL  variable. 

Syntax:  SET(syabol“*xpr*ssion) 

Paraaetera:  exp  -  a  valid  arithmetic,  logical  or  literal 

aasignaent  expression  -  aay  be  deliaited  by 
parentheses 

Reaarks:  The  job-step  aborts  if  the  variable  is  unknown, 

is  changable  only  by  COS,  or  is  a  constant. 

Siailar  coaaands:  NOS/BE,  NOS:  SET 

VMS:  $  naae  "  value 

Exaaples:  SET(J1«J1+1)  < —  increment  procedure-local 

register  Jl  by  1 

SET (Gl- (SYSID. AND. 177777B) ) 

* —  put  the  low-order  2  characters 
of  the  current  systea  revision 
level  into  global  register  Gl 

SET  (G3-  (  (ABTCODE .  EQ .  74)  .  AND.  (G2 .  EQ .  0)  )  ) 

A —  define  global  register  G3 


SID  Debug  programs  interactively  or  in  batch. 

Syntax:  SID-adn, I“idn,S“sdn, L"lsn, ECH“edn,CNT_n. 

Parameters:  adn  -  absolute  dataset  naae  (fron  LDR,AB-adn) 

I*  -  Input  directives 
(default:  SIN) 

S“  -  Symbol  dataset  naae 
(default:  SDEBUG) 

L*  -  Listable  output 
(default:  $OUT) 

ECH“  -  Dataset  for  echoing  input  directives 
(default:  no  echoing) 

ECH  -  Saa*  as  ECH-ldn 

CNT-  -  Breakpoint  interrupt  count 
(default:  0  (no  abort)) 

Siailar  coaswnds:  NOS/BE,  NOS:  CID 

VMS:  DEBUG 


1 
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SKI  PD  Skip  blocked  datasets  (position  at  EOD  (after  laat  EOF)). 

Syntax:  SKIPD, DN-dn. 

Paraaeters:  DN  -  (default:  $IN) 

Saae  as:  SKI PF, DN-dn, NF. 

Siailar  coaaands :  NOS/BE:  EOI  (DTRC) 

NOS:  SKIPEI 

VMS:  OPEN  with  ACCESS-APPEND  in  prograa 

Exaaples:  SKIPD,DN-ayf ile. 


SKIPF  Skip  blocked  files  froa  current  position. 

Syntax:  SKIPF ,DN-dn,NF-nf . 

Paraaeters:  DN-dn  -  (default:  $IN) 

NF-nf  -  deciaal  nuaber  of  files  to  skip  forward 

NF— nf  -  deciaal  nuaber  of  files  to  skip  backward 

NF  -  position  after  the  last  EOF  of  the 

dataset 

(default:  NF-1) 

Siailar  coaaands:  NOS/BE:  SKIPF;  SKIPR  (both  DTRC) 

NOS:  SKIPF;  SKIPFB;  SKIPR 

Exaaples:  SKIPF, DN-ayf ile. 


SKIPR  Skip  blocked  records  froa  the  current  position. 

Syntax:  SKIPR, DN-dn, NR-nr. 

Paraaeters:  DN-dn  -  (default:  $IN) 

NR-nr  -  deciaal  nuaber  of  records  to  skip 
forward 

NR— nr  -  deciaal  nuaber  of  records  to  skip 
backward 

NR  -  position  after  the  last  EOF  of  the 
current  file 
(default:  NR-i) 

Siailar  coaaands:  NOS/BE:  COPTS  (DTRC) 

Exaaples:  SKIPR, DN-ayf ile. 
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SKIPU  Skip  ••etors  on  unblocked  datasets. 

Syntax:  SKIPU, DN-dn,NS-ns. 

Paraaeters:  BN-dn  ~  no  default 

NS-ns  -  deeiaal  nuaber  of  sectors  to  skip 
forward 

NS —ns  -  deeiaal  nuaber  of  sectors  to  skip 
backward 

NS  -  position  after  the  last  sector  of  the 

dataset 

(default:  NS-1) 

Exaaples:  SKIPU, DN-ayfile. 


SORT 


Sort/aerge. 

Syntax:  SORT,S-sdn[:sdn. . .]  ,M-adn[:adn. . .]  ,0-odn, 

DIR-ddn , L- 1 dn , ECHO , RETAIN , NOVERF . 


Paraaeters:  S- 
M- 


0- 


-  Input  dataset  of  up  to  8  unsorted  files 

-  Input  dataset  of  up  to  8  sorted  files  to 

be  aerged 

(S  or  M  or  both  aust  be  specified) 

-  Output  dataset  (required) 


DIR-  -  Dataset  with  SORT  directves 
(default:  SIN) 


L-  -  Listable  output 
(default:  $0UT) 

L-0  -  No  listable  output 

ECHO  -  Write  directives  to  L-ldn 

(Not  allowed  if  L-0) 


RETAIN  -  Retain  input  order  for  equal  keys 


NOVERF  -  Do  not  verify  the  sort 
(default:  verify) 

Siailar  coaaands:  NOS/BE,  NOS:  S0RT5 
VMS:  SORT 


* 
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SPY  Generate  a  histograa  on  tine  uaage  within  a  program  to  locate 

inefficient  code. 

Syntax:  SPY, PREP ,BS-bektsz,D-dbugdn,S-scrtch, 

SUB-rtnl:rtn2: . . :rtnn,TS-time. 

SPY , POST , ADDRESS , L- 1 i a tdn , NOLABEL , NOLIB , S-a  cr t  ch , 
SUB-rtnl :rtn2: . . :rtnn,MINHIT-n. 

Parameter a:  BS-  ~  bucket  aize  in  worda;  each  bucket 

begina  on  a  word  addreaa  that  ia  a 
multiple  of  the  bucket  aize 
(default:  4) 

D-  ~  dataaet  containing  the  program' a 

aymbol  table 
(default:  $DEBUG) 

S-  -  dataaet  where  SPY, PREP  will  write 

tablea  for  SPY, POST  to  uae 

SUB-  -  liat  of  up  to  20  routinea  to  be 
analyzed 

TS-  -  time  alice  in  microaeconda 

(default:  500) 

ADDRESS  -  the  report  will  be  by  addreaa  inatead 
of  by  label 

L-  -  the  output  report  liating  dataaet 

(default:  $0UT) 

NOLABEL  -  the  bucket  aize  will  be  an  entire 
routine 

NOLIB  -  exclude  library  calle  to  routinea 
whoae  name a  begin  with 

MINHIT*  ~  minimum  number  of  bita  required  to 

generate  a  report  line  for  e  bucket  or 
label 

(default:  1;  0  ia  NOT  recommended) 

Remarks:  At  SPY's  request,  COS  reads  the  address  of  the 

current  machine  instruction.  A  group  of 
addresses  is  called  a  bucket;  accessing  a  bucket 
is  called  a  hit.  After  execution,  SPY  generates 
a  report  of  all  buckets,  including  a  bar  graph 
showing  where  the  time  has  been  spent. 

Use  SEGLDR  to  create  the  absolute;  LDR  nixes 
code  and  data  making  it  more  difficult  to 
analyze. 
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Similar  comandi:  NOS:  HOTSPOT  ) 

NOS/BE:  SPY;  PRINTSPY 
VMS:  PCA 

Examples :  CFT.ON-IZ.  -or-  CFT77, DEBUG,  -or-  CAL.SYM. 

-or-  PASCAL, 0-DM3. 

SEGLDR , CMD- ' ABS-myabs  ' .  < —  you  must  create  an 

absolute  program 

SPY, PREP.  «—  prepare  for  SPY 

myabs.  < —  run  your  program 

SPY, POST.  < —  prepare  the  report 

Since  an  absolute  module  is  always  created,  you 
could  use 

SEGLDR. 

SPY, PREP. 

$ABD. 

SPY, POST. 


SUBMIT  Send  a  local  dataset  to  the  COS  input  queue. 

Syntax :  SUBMIT , DN-dn , SID-s  f , DID-df , DEFER , NLRS . 

Parameters:  DN-  -  Dataset  containing  the  job  (required) 
SID-  -  Source  front-end  identifier 

k  (2  alphameric  characters) 

DID-  -  Destination  front-end  identifier 
(2  alphameric  characters) 

DEFER  -  Defer  the  SUBMIT  until  the  dataset  is 

released 

(default:  SUBMIT  occurs  immediately) 

NLRS  -  Do  not  release  the  dataset  after  the 

SUBMIT;  it  remains  local  and  read-only 
(default:  dataset  is  released  after  the 
SUBMIT) 

Similar  commands:  NOS/BE:  BATCH, ..., INPUT;  ROUTE, DC-IN 
NOS:  ROUTE, DC-IN;  CSUBMIT 

VMS:  SUBMIT;  CRAY  SUBMIT 

Examples:  SUBMIT.DN-myjobl. 


) 


we**i&*SZ' 
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Turn  pseudo  sense  switches  on/ off. 

Syntax:  SWITCH, n*x. 

Parameters:  n  -  switch  nusber  (1-6) 
x  -  switch  position 

ON  -  turned  on  (set  to  1) 

OFF  -  turned  on  (set  to  0)  * 

Similar  commands:  NOS/BE:  SWITCH 

NOS:  SWITCH;  OFFSW;  ONSW 

Examples:  SWITCH, 2-0N. 

UNBLOCK  Convert  a  blocked  dataset  to  an  unblocked  dataset. 
Syntax: 

Parameters: 

( 

Remarks : 

Examples: 

A —  Copy  blocked  file  MYBLR  as 
unblocked  file  MYUNBLK 


UNBLOCK, DN-ldn.  (1) 

UNBLOCK, I-idn.O-odn.  (2) 

DN-  -  the  dataset  to  be  replaced  (using  an 
intermediate  dataset  $UNBLK) 

(ldn  is  rewound  before  and  after) 

1“  -  the  blocked  input  dataset 

(default:  $IN) 

(idn  is  not  rewound  before  the  copy) 

0~  -  the  unblocked  output  dataset 

(if  previously  marked  to  be  unblocked 
(ASSIGN) ,  odn  is  not  rewound  before; 
otherwise,  odn  is  replaced) 

UNBLOCK  is  intended  primarily  for  postprocessing 
datasets  created  by  or  for  certain  stations. 

UNBLOCK , DN“myf i 1 e . 

* —  Replace  MYFILE  with  unblocked 
copy  of  itself 


UNBLOCK, I-myblk , 0-myunblk . 


4 


SWITCH 


UPDATE  Source  and  data  maintenance. 

Syntax:  UPDATE, P“pdn, 1“ idn 1 : idn2: . . . : idnn,C-cdn,N-ndn, 

L“ldn,E"edn,S*sdn, *-m, /-C,DW-dw,DC“dc, 
ML-n,fc,opts. 

where  t  is  one  of:  F 

Q[-dl:d2: . . . :dn] 

Q*  *  dl ,  d2 , . . . ,  dj  .  dk , , . . ,  dn 1 
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Parameters:  P“  -  Program  library  dataset 
(default:  $PL) 

P  ~  Same  as  P-$PL 

P-0  -  Required  for  a  creation  run 

I-  -  Input  datasets  with  directives  and  text 
(Maximum:  100  datasets) 

(default:  $IN) 

I  ~  Same  as  I-$IN 
1-0  -  No  input  dataset 

C-  -  Compile  output  dataset 
(default:  $CPL) 

C  ~  Same  as  C-SCPL 
C-0  -  No  compile  output 

N-  -  New  program  library  dataset 

(default:  creation  run:  $NPL 

modification  run:  no  new  PL) 

N  -  Same  as  C-$CPL 
N-0  -  No  new  PL 

L-  -  Listable  output 
(default:  $OUT) 

L  -  Same  as  L-SOOT 
L-0  -  No  listable  output 

E-  -  Error  dataset  name 
(default:  $0UT) 

E  -  Same  as  E-$0UT 

E-0  -  Errors  written  to  L-ldn 

(If  edn  and  ldn  are  the  same,  ldn  is 
used  and  E-0) 

S-  -  Source  output  dataset 
(default:  $SR) 

S  -  Same  as  S-$SR 
S-0  -  No  source  output 

*-m  -  Master  character  for  directives 
(defaults:  creation  run:  * 

modification  run:  read  from 
the  PL) 

/-e  -  comment  character 
(default:  /) 

DW-  -  Data  width  (number  of  characters  written 
per  line  to  compile  and  source  datasets 
(defaults:  creation  run:  72 

modification  run:  dw  when  PL 
was  created) 

DW  -  Same  as  DM-72  (creation)  or  use  dw  when  PL 
was  created  (modification  run) 
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DO  -  Declared  modifications  option: 

ON  -  aod  declaration  required 
OFF  -  aod  declaration  not  required 
(default:  OFF) 

ML"  -  Message  level  (highest  severity  level  to 
suppress) : 

1  -  coaaent 

2  -  note 

3  -  caution 

4  -  warning 

5  -  error 

(default:  3  ~  suppress  COMMENT,  NOTE,  and 
CAUTION  aessages) 

F  -  Full  UPDATE  aode 

(default  (F  and  Q  oaitted) :  normal  UPDATE 

aode) 

Q-  -  Quick  UPDATE  aode 

(Maximum:  100  deck  naaes) 

(default  (F  and  Q  oaitted):  noraal  UPDATE 

aode) 


opts  -  NA 
NR 
IF 
IN 
ID 
ED 
CD 

UM 

SQ 


NS 

K 


no  abort 

no  rewind  of  C  and  S  files 

write  conditional  text  suanary  to  ldn 

write  input  to  ldn 

write  identifier  suanary  to  ldn 

write  edited  card  suanary  to  ldn 

write  coapile  dataset  generation 

directives  to  ldn 

write  unprocessed  nodif ications  to 
ldn  and/or  edn 

put  sequencing  in  source  output  in 
columns  dw+1  on  (no  effect  on  coapile 
output) 

no  sequencing  in  coapile  output 
sequence  decks  according  to  Q 


Siailar  commands:  NOS/BE,  NOS:  UPDATE 

VMS:  CMS;  LIBRARIAN 

Examples:  UPDATE, I-aysorc, P-0,  ID. 

A —  create  $NPL,  list  identifiers 
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WRITEDS  Initialize  a  blocked  dataaet. 

Syntax:  WRITEDS ,DN-dn, KR-nr ,RL-rl . 

Parameters:  DN-dn  -  required 

“  required  -  deciaal  nuaber  of  records  to 
be  written 


Remarks: 


~  optional  -  deciaal  record  length 

(if  non-zero,  the  first  word 
of  each  record  is  the  record 
nuaber  as  a  binary  integer 
starting  with  1) 

(default:  0  (a  null  record)) 

Writes  a  single  file  containing  a  specific  nuaber 
of  records  of  a  specific  length.  This  is  useful 
only  for  randoa  (direct-access)  files,  which  must 
be  pre-foraatted. 


Examples:  WRITEDS, DN-ayf ile,NR-1000,RL-125. 
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*****  Appendix  C  ***** 


***  DEC  VMS  DCL  Contends  *** 

DEC  VMS  DCL  (Digital  Coanand  Language)  conandi  have  the  following 
general  syntax: 

verb  paraal  paraa2  ...  !  consents 

Cfilenaae  paraal  paraa2  ...  paran8  1  consents 

RUN  filenaae  I  coaaents 


verb  is  the  naae  of  the  routine  to  be  executed.  It  consists  of  an 
alphabetic  character  (A-Z,  a-z,  $,  _)  followed  by  0-31 
alphanuaeric  characters  for  the  naae  of  the  coanand.  A 
procedure  (.COM)  is  executed  using  an  at  sign  ("8")  followed 
by  the  naae  of  the  procedure  file.  A  user  progran  is  executed 
by  the  RUN  stateaent. 

paraai  are  paraneters,  which  aay  be  positional  or  keyword. 

coaaents  follow  an  exclaaation  aark  ("I”)  that  is  not  part  of  a  quoted 

paraaeter. 


Because  VMS  has  an  extensive  on-line  help  facility,  the  individual 
DCL  coaaands  are  not  described  here.  For  a  list  of  the  help  topics, 
type  "HELP".  For  specific  helps,  type  "HELP  topic".  The  Coaputer 
Center  aaintains  the  following  help  libraries  which  are  always 
available: 


HLPSLIBRARY 

HLP$LIBRARY_1 

HLP$LIBRARY_2 

HLPSLIBRARY3 

HLP$LIBRARY_4 


8ccf 

general  inforaation  about  the  Coaputer 
Center 

fDTLIB 

subprograas  in  library  DTLIB  (Cray  COS 
CDC  NOS,  and  DEC  VAX/VMS) 

^UTILITIES 

coaaands,  prograas,  procedures,  and 
packages  added  at  DTRC 

8CRAY 

DTRC  additions  to  Cray 

8COS 

Cray  COS  JCL  stateaents 
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***  Selected  DEC  VAX/VMS  Commands  *** 

The  following  are  a  few  of  the  DEC  VAX/ VMS  DCL  commands: 


ALLOCATE  Assign  a  tape  drive  to  a  logical  name. 

Syntax:  ALLOCATE  device  logical_name 

Parameters:  device  -  the  logical  name  of  a  specific  or 

generic  tape  drive 

log_name  -  the  name  by  which  the  tape  is  to  be 
known  to  the  job  (1-255  characters) 

Examples:  $  ALLOCATE  HU:  tape 

A —  any  tape  drive  starting  with  MU 
will  be  assigned  to  logical  name 
TAPE 


DEALLOCATE  Return  a  previously  allocated  device  and  disassociate  the 
job's  logical  name  from  the  tape  drive. 


Syntax:  DEALLOCATE  logical_naa* 

DEALLOCATE  /ALL 


Parameters:  log_nam*  -  the  name  by  which  the  tape  is  known 

to  the  job 


Qualifiers:  /ALL  -  deallocate  all  allocated  devices 


Examples: 


$  DEALLOCATE 


tape 

A —  deallocate  the  tape  drive 
associated  with  logical  name 
TAPE 


DISMOUNT  Release  a  tape  volume  that  was  previously  mounted. 


Syntax: 


DISMOUNT  device  name 


Parameters:  d*vic*_nam*  -  the  physical  or  logical  name  of 

the  device  to  be  dismounted 

Qualifiers:  /NOUNLOAD  -  Do  not  unload  the  tape  (keeps  the 

device  and  volume  in  a  ready  state 
(default:  /UNLOAD) 


Examples:  $  DISMOUNT  /NOUNLOAD  tape 

A —  release  file  TAPE  but  keep  the 
tap*  mounted  for  a  future  MOUNT 
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INITIALIZE  Initialize  a  magnetic  tape. 

Syntax:  INITIALIZE  device  van 

Parameters:  device  -  the  name  given  the  tape  in  the  ALLOCATE 

van  -  a  6-character  volume  serial  number 
(all  DTRC  Network  tapes  are  NAnnnn, 
where  nnnn  is  a  4-digit  number) 

Remarks:  HELP  INITIALIZE  for  additional  qualifiers 

Examples:  See  page  6-1-6 


MOUNT  Mount  a  magnetic  tape  and,  if  labelled,  cheek  the  label. 

Syntax:  $  MOUNT  device,...  [  van,...  ]  [  logicalname  ] 

/BLOCKS IZE-mbl  /COMMENT«"string" 
/DENSITY-den  /FOREIGN 

/ [NO] LABEL  /RECORDS IZE-mr 1 

/ [NO] UNLOAD  / [NO] WRITE 

Parameters:  device  -  physical  or  logical  name  of  the  tape 

drive  (for  more  than  one  tape,  separate 
with  commas  or  plus  signs) 

vsn  -  the  volume  serial  number  of  the  tape(s) 

(0-6  characters) 

(not  with  /FOREIGN) 

log_name  -  the  logical  name  to  be  used 

(not  needed  if  is  a  logical  name  is 
used  for  DEVICE) 

Qualifiers:  /BLOCKSIZE-  -  the  default  block  size  in  bytes 

(range:  18-65,534;  default:  2048) 

/COMMENT  -  -  specify  additional  information  to 

the  operator 

/DENSITY-  -  the  tape  density  (1600  or  6250) 

(default:  the  density  of  the  first 
record  of  the  volume) 

/FOREIGN  -  an  unlabelled  tape 

/LABEL  -  the  tape  has  VAX/VMS  ANSI  labels 

/NOLABEL  -  the  same  as  /FOREIGN 

(default:  /LABEL) 

/RECORDS I ZE-  -  the  number  of  characters  in  each 
record  -  normally  used  with 
/FOREIGN  and  /BLOCKSIZE 
(mrl  <-  abl) 
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/UNLOAD  -  unload  the  tape  when  DISMOUNTed 

/NOUNLOAD  -  do  not  unload  the  tape 
(default:  /UNLOAD) 


/WRITE  -  the  tape  can  be  written 

/NOWRITE  -  the  tape  ie  read  only 

(default:  /WRITE) 


Exaaples:  $  MOUNT  tape:  /FOREIGN  /DENSITY-1600  - 

/RECORDS I2E- 140  /BLOCKS IZE-5040  - 
/comaent-"Please  aount  slot98  ",  - 
"v»n-ABCD01  ring" 

* —  aount  a  elot  tape  for  writing 
blocked  records 


$  aount  aytape  NA9999  /density-1600 

/coaaent-"Pls  aount  with  NO  ring" 
A —  aount  a  read-only  tape 


See  page  6-1-6  for  an  exaaple  of  initializing  a 
tape. 
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***  Selected  DEC  VAX/ VMS  Addition*  *** 
The  following  are  DTRC  additione  to  DEC  VAX/VMS; 


DETAB  Remove  tabs  from  a  file  or  convert  tab-format  Fortran  source 

lines  to  f ixed-format. 

Syntax:  DETAB  in_file_spec  out_f ilespec 

/TABS-<tab_l is t>  /INCREMENT-<inc> 
/FORTRAN 

Parameters:  in_file_spec  ~  the  input  file  containing  tabs 

out_f ile_*pee  -  the  output  file  with  any  tabs 
removed 

(default:  next  version  of 
in_f ile_spec) 

Qualifiers:  /FORTRAN  -  tab-format  lines  are  converted  to 

fixed-format  (the  first  tab  is  set 
at  column  7  (or  6  for  continuation 
lines)  and  remaining  tabs  are 
converted  to  three  blanks) 

Since  tabs  are  collapsed  to  three 
blanks,  it  is  unlikely  that  a 
DETABbed  line  will  exceed  72 
characters.  If  any  lines  do,  you 
will  be  told  how  many  and  the 
length  of  the  longest  line. 

/NOFORTRAN  -  no  reformatting  is  done 

/ INCREMENT* inc  -  tabs  are  set  every  <inc> 
columns 

If  both  /TABS  and  /INCREMENT 
are  specified,  tabs  are  set  at 
the  column (s)  specified  by 
/TABS*  and  every  <inc>  columns 
after  that. 

/LOG  -  list  summary  information  and 

any  warning  messages 


(Default:  /NOLOG) 
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Remarks : 


/TABS-n  -  set  one  tab  at  column  n 

/TABS“(nl,n2, . . . ,nn) 

-  set  tabs  at  these  columns 

If  / INCREMENT- inc  is  not 
specified,  then  the  tabs 
following  the  last  defined  tab 
stop,  are  each  converted  to  a 
single  blank. 

If  / INCREMENT- inc  is  specified, 
then  the  tabs  following 
the  last  defined  tab  stop  will 
be  every  inc  columns  after  the 
last  defined  tab  stop. 

(Defaults:  /TABS-0  /INCREMENT-8  /NOFORTRAN) 

Note:  /FORTRAN  overrides  /TABS  and  /INCREMENT. 

This  is  useful  for: 

.  Preparing  files  to  go  to  the  Cray,  Xerox  8700 
or  Microfiche,  which  don't  recognize  the  tab 
character 

.  Removing  tabs  in  Fortran  programs  (for  sending 
to  another  computer  (such  as  the  Cray  and 
CYBER  860)  which  don't  recognize  the 
tab-format) . 

.  Changing  the  tab  values  while  removing  them 
(e.g.,  changing  from  every  8  columns,  which  is 
the  VAX/VMS  standard,  to  every  5  columns) . 


Examples 


DETAB  myprog.for  /F 
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***  Cray  Station  Coaaands  *** 

The  VAX/VMS  Cray  Station  provides  the  VMS  user  with  access  to  the 
Cray  X-MP. 

The  following  discussion  of  the  Cray  station  cosnsands  is  derived 
froa  the  on-line  helps  for  the  CRAY  coaaand.  Type  "CRAY  HELP"  at  the 
DCL  loval  or  "HELP"  in  Cray  context  for  more  detailed  inforaation. 


CRAY  Enter  the  Cray  context  utility  or  executes  a  single  station 
coasMnd  when  that  coaaand  is  supplied  as  a  paraaeter. 

Syntax:  $  CRAY  [station_coaaand]  /BREAKTHROUGH  /REFRESH 

Paraaeters:  station_coaaand  -  a  single  Cray  station  coaaand 

to  be  executed 

oaitted  -  you  reaain  in  Cray  context  until 

you  enter  EXIT 

Qualifiers:  /BREAKTHROUGH  -  a  display  refresh  occurs  during 

coaaand  input 

(valid  for  refresh  aode  only) 
(default:  /NOBREAKTHROUGH) 

/REFRESH  -  enable  display  refreshing  in  a 

split  screen  Cray  context 
(requires  DEC_CRT  option  enabled) 
/NOREFRESH  -  standard  teletype  environaent 

(defaults:  /REFRESH  (VTlOO-type 

terainals) 
/NOREFRESH  (non-VTIOO 
terainals)) 

See  also:  CINT 

Siailar  coaaands:  NOS:  ICF 


Exaaples 


$  CRAY 


Page  08 


RevO 


88/10/01 


CINT 


$ 


From  the  DCL  level,  enter  a  subset  of  Cray  context  that 
accepts  only  the  INTERACTIVE  command  and  its  associated 
subeoaoands. 


Syntax:  $  CINT 

Reaarks:  No  other  Cray  context  coamands  are  available 

during  a  CINT  session.  CINT  is  designed  to 
give  better  interactive  perforaance,  since  it 
invokes  only  a  subset  of  the  Cray  context  iaage. 

For  the  full  set  of  Cray  context  coaaunds,  use 
the  INTERACTIVE  eoaaand  (in  Cray  context) 
instead  of  CINT. 


See  also:  INTERACTIVE 


Siailar  coaaands:  NOS:  ICF 
Exaaples:  $  CINT 


**  Cray  Context  Coaaands  ** 

Create  a  teaporary  VMS  subprocess,  allowing  you  to  enter  DCL 
coaaands. 

Syntax:  $  [dcl_coaaand] 

Paraaeters:  dcl_coaaand  -  any  DCL  command 

Reaarks:  Since  a  subprocess  is  created,  any  logical  naaes 

or  process  resources  created  in  the  subprocess 
will  not  be  available  froa  the  aain  process. 

To  return  to  Cray  context,  type  LOGOUT. 

Siailar  coaaands:  NOS  ICF: 

Exaaples:  $  show  users 


Display  the  next  page  of  infomation  in  Cray  context. 
Syntax:  + 

Siailar  eoanads:  NOS  ICF: 


Exaaples 


CRAY>  ♦ 
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Display  the  previous  page  of  inforaation  in  Cray  context. 
Syntax: 

Siailar  coaaands:  NOS  ICF: 

Exaaplas:  CRAY>  - 


Execute  an  indirect  station  coaaand  file  in  Cray  context. 
Syntax:  8file_spec 

Paraaeters:  file_spec  -  a  VMS  file  containing  station 

coaaands 

Reaarks:  is  a  synonya  for  the  PLAY  coaaand. 

See  also:  PLAY 

Siailar  coaaands:  NOS  ICF:  /PLAY 
Exaaplas:  CRAY>  8station.COM 


ABORT  Interrupt  the  current  interactive  Cray  job  step  and  return 
control  to  the  COS  Control  Stateaent  Processor  (CSP) .  CSP 
will  then  issue  the  "1"  proapt.  Any  COS  output  queued  for  the 
terainal  will  be  displayed  before  the  proapt  is  issued. 

Syntax:  ABORT 

See  also:  DROP,  KILL 

Siailar  coaaands:  NOS  ICF:  ABORT 

Exaaplas:  CRAY>  ABORT 


ATTACH  Redirect  COS  interactive  terainal  output  to  an  alternate 

device. 

Syntax:  ATTACH  [alt_device]  /CHAR- (char, pos) 

/MRS-aax_rec  size 

/OFF 

/ON 

Paraaeters:  alt_device  -  the  alternate  device 

oaitted  -  the  current  output  device 

Qualifiers:  /CHAR  -  route  entire  record  to  attached  device 

if  character  <char>  is  in  position  <pos> 
of  the  current  Cray  interactive  output 
record 
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/MRS  -  route  entire  record  (no  carriage  control) 
to  attached  device  if  the  length  of  the 
current  Cray  interactive  output  record 
exceeds  max_rec_size 

/OFF  -  do  not  route  Cray  interactive  records  to 
to  attached  device  (all  other  parameters 
or  qualifiers  ignored) 

/ON  -  enable  routing  of  Cray  interactive 
records  to  an  attached  device 

Default:  /ON 

Reaarks:  The  device  specified  Bust  not  be  in  use  and  can 

be  any  device  that  accepts  record  I/O,  such  as  a 
graphics  terminal. 

Similar  commands:  NOS  ICF:  /CONNECT 


ATTENTION  Interrupt  current  interactive  Cray  job  step  and  enter 
reprieve  processing. 

Syntax:  ATTENTION 

See  also:  ABORT 

Remarks:  If  reprieve  processing  not  specified,  same  as 

ABORT. 

Similar  commands:  NOS  ICF:  /ATTENTION 
Examples:  CRAY>  ATTENTION 


BYE  Terminate  an  interactive  session  and,  optionally,  the  COS 

interactive  job. 

Syntax:  BYE  /ABORT  /SAVE 

Qualifiers:  /ABORT  -  terminate  the  associated  COS 

interactive  job 

/SAVE  -  the  associated  COS  interactive  job 
remains  active  and  output  is  saved; 
if  the  job  reaches  a  COS  threshold  for 
output  messages  or  requires  input,  the 
job  is  suspended;  the  terminal  can  be 
reconnected  to  the  COS  interactive  job 
by  the  INTERACTIVE  command 

Reaarks:  BYE  /ABORT  is  equivalent  to  QUIT. 
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CLEAR 


COLLECT 


COMMENT 


See  also:  QUIT 

Similar  commands:  NOS  ICF:  /BYE,  /LOGOFF,  /QUIT 
Examples:  CRAY>  BYE 


Terminate  any  display  command  and  clears  the  display  portion 
of  the  screen. 

Syntax:  CLEAR 

Reswrks:  CLEAR  is  only  available  when  Cray  context  is  in 

refresh  mode. 

Examples:  CRAY>  CLEAR 


Store  COS  interactive  output  in  a  VMS  file. 


Syntax: 


COLLECT  file_spec  /ECHO  /OFF  /ON 


Parameters:  file_spec  -  the  VMS  file  to  receive  the  COS 

interactive  output 

Qualifiers:  /ECHO  -  display  the  output  generated  at  the 

terminal  as  well  as  the  VMS  file 

/NOECHO  -  do  not  echo  the  generated  output  at  the 
termiinal;  only  into  the  VMS  file 
(default:  /ECHO) 

/OFF  -  stop  writing  COS  job  output  to  a  VMS 
file  and  close  the  VMS  file  (ignore 
other  qualifiers 

/ON  -  write  COS  job  output  to  a  VMS  file 
(default:  /ON) 


Remarks : 

COLLECT  can  be  used 
initiated. 

Examples: 

CRAY>  COLLECT  mycosf 

Insert  coma 

tents  into  an  indirect  ; 

Syntax: 

COMMENT  string 

Parameters: 

string  -  any  text 

Remarks : 

The  comment  line  can 
including  "COMMENT". 

See  also: 

8,  MESSAGE 
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Siailar  coaaanda:  NOS  ICF:  /* 
Exaaples:  COMMENT  Thia  ia  a  coaaent 


CONTROL_Z  CTRL-Z  (AZ)  exita  the  current  proceaaing  mode. 


Syntax:  AZ  < —  A  ia  the  CTRL  key 

Remark a :  In  reaponae  to  the  Cray  context  proapt  (CRAY>) , 

you  are  returned  to  DCL;  in  a  Cray  interactive 
aeaaion,  you  are  returned  to  coanaand  aode. 
While  you  are  being  prompted  for  coaaand 
paraaetera,  CTRL-Z  cancela  the  coaaand. 

CTRL-Z  alao  terainatea  the  execution  of  an 
indirect  atation  coaaand  file. 


See  alao:  8 


Exaaplea: 


I  AZ 

CRAY>  QUIT 
CRAY>  AZ 
$ 


< —  leave  Cray  aeaaion 
< —  terminate  Cray  aeaaion 
< —  terainate  Cray  context 
< —  you  are  back  at  the  DCL  level 


DATASET  Teat  for  the  exiatence  of  a  COS  peraanent  dataaet. 


Syntax: 

Paraaetera: 

Qualifiera: 


Exaaplea: 


DATASET  pdn  /ID-id  /ED-ed  /OV-owner 
pdn  -  naae  of  PDS 

/ID-  -  id  of  the  dataaet  (1-8  charactera) 
(default:  null) 

/ED-  -  edition  nuaber  of  the  dataaet  (1-4095) 

(default:  current  higheat  edition  nuaber) 

/OV-  -  owner  of  the  dataaet 

DATASET, ayfile. 


DELAY  Suapend  execution  of  an  indirect  atation  coaaand  file  for  a 
apecified  period  of  tiae. 

Syntax:  DELAY  aeconda 

Paraaetera:  aeconda  -  auapenaion  tiae  in  aeconda 
Exaaplea:  DELAY  20 
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DISCARD 


DROP 


EOF 


EXIT 


Diacard  all  output  from  a  COS  interactive  aeasion  until  the 
next  COS  proapt  is  issued. 

Syntax:  DISCARD 

Similar  commands:  NOS  ICF:  /DISCARD 

Examples:  DISCARD 


Terminate  a  COS  job  and  return  the  associated  output  dataset. 
COS  job  execution  enters  reprieve  processing  after  the  next 
COS  EXIT  control  statement. 


Syntax:  DROP  jsq 

Parameters:  jsq  -  job  sequence  number 

Remarks:  Use  STATUS  to  obtain  the  job  sequence  number 

(COS  jsq) . 

KILL  terminates  the  job  immediately;  DROP 
continues  processing  after  an  EXIT  statement. 


See  also:  ABORT,  KILL 


Examples:  $  CRAY 

CRAY>  STATUS 
CRAY>  DROP  9876 


Sends  an  end-of-file  record  to  a  connected  COS  interactive 
job. 

Syntax:  EOF 

Remarks:  EOF  is  normally  required  to  terminate  COS  file 

input  from  the  terminal. 

Similar  commands:  NOS  ICF:  /EOF 

Examples:  CRAY>  EOF 


Leave  Cray  context  command  mode  and  return  to  DCL. 

Syntax:  EXIT 

AZ 

Remarks:  EXIT  will  close  the  file  specified  in  a  RECORD 

command,  if  it  is  still  open. 


See  also 


RECORD 
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Siailar  commands:  NOS  ICF:  /EXIT 
Examples:  CRAY>  EXIT 


HELP  Display  help  information  on  the  Cray  station  commands. 

Syntax:  HELP  [station_command] 

Parameters:  station_command  -  a  specific  command  for  which 

help  is  desired 

omitted  -  a  list  of  all  available  commands 

Similar  commands:  NOS  ICF:  /HELP 
Examples:  $  CRAY  HELP 


CRAY>  HELP 


CRAY>  HELP  INTERACTIVE 


INTERACTIVE  Initiate  or  restart  an  interactive  session. 

Syntax:  INTERACTIVE  /JN» jobname 

/LONER 

/MML“*aximum  message_length 
/UPPER 

/US*username 

Qualifiers:  /JN»  -  the  COS  interactive  jobname  (1-7  chars) 

(if  omitted,  you  will  be  prompted  for  it) 

/LOWER  -  don't  convert  lower  case  to  upper  case 
(default:  /LOWER) 

/MML*  -  the  maximum  message  length 

/UPPER  -  convert  lower  case  to  upper  case 
(default:  /NOUPPER  (/LOWER)) 

/US*  -  the  COS  username  (1-15  characters) 

(if  omitted,  you  will  be  prompted  for  it) 

Remarks:  Cray  interactive  is  available  only  an  attached 

station. 

See  also:  CINT 

Similar  commands:  NOS  ICF:  /LOGON 
Examples:  $  CRAY  INTER 


$  CRAY 

CRAY>  INTER  /JN- jobname  /US-xxxx 
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ISTATUS 


JOB 


JSTAT 


Get  the  statue  of  your  COS  interactive  job  (with  CPU  tine  used 
and  the  last  COS  logfile  Message). 

Syntax:  ISTATUS 

See  also:  JSTAT,  STATUS 

Exaaples:  ISTATUS 

Display  the  status  of  a  specific  COS  job. 

Syntax:  JOB  jobnaae  /JSQ-jsq 

Parameters:  jobnaae  -  the  COS  job  naae 

Qualifiers:  /JSQ*  -  the  job  sequence  nuaber  from  which  to 

start  the  search  for  the  job 

Siailar  commands:  NOS  ICF:  /STATUS 

Examples :  JOB  ayjobA 


Display  the  status  of  a  specific  job  and  its  related  tasks. 
Syntax:  JSTAT  jsq  /[NO]  CYCLE  /  [NO] TRANSLATE 

Parameters:  jsq  -  the  job  sequence  nuaber 

Qualifiers:  /CYCLE  -  cycle  the  display  refresh  through 

all  the  available  information 
/NOCYCLE  -  display  only  the  current  page  until 
you  enter  "+"  or 
(default:  /NOCYCLE) 

/TRANSLATE  -  display  the  terminal  ID  field  in 
the  VMS  UIC  equivalent 

/NOTRANSLATE  -  display  it  in  the  station  internal 
fora 

(default:  /TRANSLATE) 


Remarks:  Use  STATUS  to  obtain  the  COS  job  sequence  number 

See  also:  ISTATUS,  STATUS 


Similar  commands:  NOS  ICF:  /STATUS 


Exaaples 


JSTAT 
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KILL  Delete  a  job  froa  the  input  queue,  or  immediately  terminate  an 
executing  job,  or  delete  the  job's  output  dataset  from  the 
output  queue. 

Syntax:  KILL  jsq 

Parameters:  jsq  -  the  job  sequence  number 

Remarks:  Use  STATUS  to  obtain  the  COS  job  sequence  number 

( j  *q)  • 

KILL  terminates  the  job  immediately;  DROP 
continues  processing  after  an  EXIT  statement. 

See  also:  ABORT,  DROP 

Similar  commands:  NOS  ICF:  /ABORT 

Examples:  CRAY>  STATUS 

CRAY>  KILL  9876 


LOGFILE  Provides  access  to  the  station  logfile  messages. 

Syntax:  LOGFILE  [file_epec]  /ACQUIRE  /ALL 

/BEFORE- time  /DISPOSE 
/ERROR  /INTERACTIVE 
/JOB  /MASTER  /NETWORK 
/NODE-nodename  /  [NO] NOTIFY 
/OPERATOR  /OUTPUT-f i 1 e_spec 
/PRINT  /RELEASE 
/SINCE-time  /SUCCESS 
/STMSG  /TRANSLATE 

Parameters:  file_spec  -  An  alternate  station  logfile  to  be 

displayed 

Qualifiers:  /ACQU  -  display  ACQUIRE  and  FETCH  messages 
/ALL  -  display  all  messages 

/BEFO  -  display  messages  froa  before  a  specified 

time 

/DISP  -  display  DISPOSE  messages 

/ERRO  -  display  error  messages 

/INTE  -  display  interactive  processing  messages 

/JOB  -  display  job  submission  messages 

/MAST  -  display  COS  master  operator  messages 
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LOOP 


MESSAGE 


/NETW  -  display  DECnet  Messages  (all  nodes) 

/NODE"  -  display  DECnet  Messages  (one  node) 

/NOTI  -  you  will  be  notified  an  asychronous 
LOGFILE  operation  is  perforaed 
(requires  /RELEASE) 

(default:  /NONOTIFY) 

/OPER  -  display  operator  messages 

/OUTP-  -  VMS  file  to  receive  station  Messages 
currently  being  displayed 

/PRIN  -  print  station  messages  currently  being 
displayed 

/RELE  -  close  the  existing  logfile  and  create  a 
new  version 

/SINC-  -  display  messages  since  a  specified  time 

/SUCC  -  display  success,  warning,  and 
informational  Messages 

/STMS  -  display  COS  station  Messages  and 
associated  replies 

/TRAN  -  display  terminal  ID  field  (TID)  as  the 
VMS  UIC  equivalent 

/NOTR  -  display  TID  in  the  station  internal  form 
(default:  /TRANSLATE) 

Examples:  CRAY*  LOGFILE  jobname.LOG  /SINCE«09:15 


Restart  execution  of  an  indirect  station  command  file  at  the 
beginning. 

Syntax:  LOOP 

8****rhs:  CTRL-Z  aust  be  issued  to  terminate  looping. 

Examples:  CRAY>  LOOP 


Send  a  Message  to  the  COS  job  logfile. 

Syntax:  MESSAGE  string  /JN-jobnaae 

/JSQ-jsq 

p*r***t#r»*  «tring  -  the  Message  text  (for  embedded  blanks, 

enclose  in  quotes  ("...") 
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Qualifier*:  /JN“  -  the  name  of  the  COS  job  to  receive  the 

measage  (requires  /JSQ) 

/JSQ"  -  the  job  sequence  number  of  the  COS  job 
to  receive  the  message 

See  also:  COMMENT 

Similar  commands:  NOS  ICF:  /* 

Examples:  MESSAGE  This  is  a  message 

PAUSE  Suspend  execution  of  an  indirect  station  command  file. 

Syntax:  PAUSE 

Remarks:  Control  passes  to  the  terminal,  where  you  can 

terminate  the  command  file  by  entering  a  command 
or  resume  it  by  entering  a  null  line  (<RET>) . 

Examples:  PAUSE 

PLAY  Execute  an  indirect  station  command  file  in  Cray  context. 
Syntax:  PLAY  file_spec 

Parameters:  file_spec  -  a  VMS  file  containing  station 

commands 

Remarks:  PLAY  files  cannot  themselves  contain  other 

(embedded)  PLAY  commands. 

"8"  is  a  synonym  for  the  PLAY  command. 

Similar  commands:  NOS  ICF:  /PLAY 

Examples:  CRAY>  PLAY  station.COM 


QUIT  Terminate  a  Cray  interactive  session  and  the  corresponding  COS 
interactive  job. 

Syntax:  QUIT 

Remarks:  QUIT  is  the  equivalent  of  BYE  /ABORT. 

See  also:  BYE 

Similar  commands:  NOS  ICF:  /BYE,  /LOGOFF,  /QUIT 

!AZ  < —  leave  Cray  session 

CRAY>  QUIT  < —  terminate  the  Cray  session 

CRAY>  EXIT  < —  terminate  the  Cray  station 


Examples 
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RECORD  Start  or  atop  the  recording  of  terainal  input  to  a  file  while 
in  Cray  context  for  later  use  with  the  PLAY  or  8  commands. 

Syntax:  RECORD  [file_spec]  /ON  /OFF 

Parameters:  file_spec  ~  the  file  into  which  terainal  input  is 

to  be  recorded 

Qualifiers:  /ON  -  start  command  recording 

(file_spec  required) 

/OFF  -  end  command  recording 
(default:  /ON) 

Remarks:  Exiting  Cray  context  autoutically  issues  a 

RECORD/OFF. 


Examples:  RECORD  station.com  /ON 

e  •  • 

RECORD  /OFF 


RELEASE  Releases  a  dataset  that  is  held  by  COS. 

Syntax:  RELEASE  jsq 

Parameters:  jsq  -  the  job  sequence  number 

Remarks:  The  dataset  status  must  be  HOLDING.  This  may  be 

due  to  VAX  disk  quota  limitations. 

Use  STATUS  to  obtain  the  COS  job  sequence  number 

(j»q)  • 


Examples:  CRAY>  STATUS 

CRAY>  RELEASE  9876 


REMOVE  Delete  entries  in  the  dataset  staging  queue. 

Syntax:  REMOVE  queue_id  /LOCKED  /SPOOL  /STAGE 

Parameters:  queue_id  -  an  8-character  hexadecimal  number  from 

the  SHOW  QUEUES  display 
(leading  zeros  can  be  omitted) 

Qualifiers:  /LOCKED  -  controls  whether  or  not  locked  entries 

are  removed 
(default:  /NOLOCKED) 

/SPOOL  -  remove  an  entry  in  the  network  spooled 
dispose  queue 

remove  an  entry  in  the  Cray  staging 
queue 


/STAGE 
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RERUN  Immediately  end  the  process ing  of  a  COS  job  and  put  it  back 
into  the  input  queue. 

Syntax:  RERUN  jsq 

Par aneters:  jsq  -  the  job  sequence  number 

Reaarks:  The  job  input  dataset  is  saved  and  all  output 

datasets  associated  with  the  job  are  deleted. 

The  job  input  dataset  is  then  rescheduled  so  the 
job  can  be  rerun.  No  action  is  taken  if  the  job 
execution  is  complete  or  if  COS  determines  the 
job  cannot  be  rerun. 

Use  STATUS  to  obtain  the  COS  job  sequence  number 
(jsq)  . 


SAVE  Stages  a  VMS  file  to  COS  disk  storage. 

Syntax:  SAVE  file_epec  /DELETE  /DF-d  /ED-ed  /ID- id 

/MN-mn  /PDN-pdn  /RD-rd 
/RT-rt  /US-us  /WT 

Parameters:  file_spec  -  the  file  to  be  staged 

File_spec  qualifiers: 

/DELE  -  delete  the  file  when  is  has  been 
successfully  staged  to  the  Cray 

/DF-  -  dataset  f onset:  CB,  BB,  or  TR 
(default:  CB) 

/ED-  -  edition  number  (0-4095) 

(default:  next  higher  number) 

/ID-  -  identification  (1-8  alphameric  chars) 

/MN-  -  maintenance  control  word 

/PDN-  -  dataset  name  to  be  used 
(converted  to  uppercase) 

(default:  the  input  file  name) 

/RD-  -  read  permission  control  word 

/RT-  -  the  retention  period,  in  days 
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/US*  -  the  COS  username 
/WT-  -  the  write  permission  control  word 
Examples:  SAVE  myfile.dat  /PDN-mydata  /US-ABCD 


SET  TERMINAL  Define  the  terminal  working  environment. 


SET  TERMINAL  FORTRAN 
SET  TERMINAL  NOFORTRAN 

Specify  whether  the  terminal  is  to  interpret  output  records 
from  a  COS  interactive  session  as  having  FORTRAN  carriage 
control. 

Default:  NOFORTRAN 


SET  TERMINAL  INFORM 
SET  TERMINAL  NOINFORM 

Enable/disable  the  sending  of  station  messages  to  the  user 
logged  on  to  VMS  at  a  VAX  terminal. 

Default:  NOINFORM 


SET  TERMINAL  PAGE 
SET  TERMINAL  PAGE-1 ines 
SET  TERMINAL  NOPAGE 

Specify  the  number  of  lines  of  output  before  a  page  break. 
Default:  NOPAGE 

Default  for  lines:  determined  by  the  scroll  setting 


SET  TERMINAL  REFRESH 

SET  TERMINAL  REFRESH-seconds  <—  integer  0-60 

SET  TERMINAL  NOREFRESH 

REFRESH  provides  a  split-screen  Cray  context  environment  and 
is  supported  only  on  terminals  with  the  DEC_CRT  attribute. 
NOREFRESH  provides  a  line-by-line  Cray  context  environment. 

Defaults:  REFRESH  (VTlOO-type  terminals) 

NOREFRESH  (non-VT100-type  terminals) 

SET  TERMINAL  SCROLL- lines 

Changes  the  Cray  context  window  size. 

"lines"  is  the  size  of  the  command  area  (bottom  window)  and 
must  be  an  integer  from  3  to  13. 


Default  for  lines:  4 
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SET  TERMINAL  WIDTH-80 
SET  TERMINAL  WIDTH-132 

Changes  the  width  of  the  terminal  within  Cray  context. 
Default:  80 


SHOW  QUEUES  Display  entries  in  the  dataset  staging  queue. 

Syntax:  SHOW  QUEUES  /ACQUIRE  /ALL  /CYCLE  /JOB 

/NODE-node  id  /OWNER  /SAVE 
/STAGE  /TRANSLATE 

Qualifiers:  /ACQU  -  display  all  entries  originating  from 

COS  (ACQUIRE  or  FETCH) 

(default:  /ALL) 

/ALL  -  display  all  entries 

(same  as  /ACQUIRE/ JOB/SAVE) 

(default:  /ALL) 

/CYCL  -  cycle  the  display  refresh  through  all 
the  available  information 

/NOCYC  -  display  only  the  current  page  until  you 
enter  "+"  or 
(default:  /NOCYCLE) 

/JOB  -  display  entries  originating  from  VMS 
(default:  /ALL) 

/NODE-  -  display  entries  from  a  specific  DECnet 
node 

(valid  only  from  an  attached  station) 

/OWNER  -  display  only  your  entries 

/SAVE  -  display  entries  for  SAVEd  datasets 
(default:  /ALL) 

/STAGE  -  display  all  Cray  staging  entries 

/TRAN  -  display  the  terminal  ID  field  in  the  VMS 
UIC  equivalent 

/NOTRA  -  display  it  in  the  station  internal  form 
(default:  /TRANSLATE) 

Remarks:  The  following  fields  are  displayed: 

.  Position  in  the  staging  queue  (L  is  a  locked 
entry  i.e.«  one  that  is  being  processed) 

.  Request  type  (JB-job,  AC-acquire/fetch, 

SV-aave) 

.  Queue  ID  for  use  in  the  REQUEUE  and  RELEASE 

commands 
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.  VAX  username  of  entry  ovmer 
.  Dataset  transfer  name  (job  name  or  dataset 

naaie) 

.  Dataset  terminal  ID  (TID) 

Similar  commands:  NOS  ICF:  /STATUS 

Examples:  SHOW  QUEUES  /OWNER 

A —  display  all  your  entries 


SNAP  Copy  the  current  contents  of  the  display  region  into  a  VMS 
file. 

Syntax:  SNAP  file_spec  /[NO] ESCAPE 

Parameters:  fiie_spec  -  VMS  file  to  receive  the  snapshot 

Qualifiers:  /ESCAPE  -  retain  escape  sequences 
/NOESCAPE  -  remove  escape  sequences 
(default:  /NOESCAPE) 

Remarks:  In  line-by-line  node,  the  last  display  requested 

is  recorded. 


Examples:  SNAP  snap.job!23 


STATCLASS  Display  the  current  COS  job  class  structure. 

Syntax:  STATCLASS  /[NO] CYCLE 

Qualifiers:  /CYCLE  -  cycle  the  display  refresh  through 

all  the  available  information 
/NOCYCLE  -  display  only  the  current  page  until 
you  enter  "+"  or 
(default:  /NOCYCLE) 

Similar  commands:  NOS  ICF:  /ICFSTATUS,  /STATUS 

Examples:  STATCLASS 


STATUS  Displays  the  COS  system  status. 

Syntax:  STATUS  /ALL  /CLASS-cless  id  /CYCLE  /EXECUTING 

/HOLD  /ID-mainframe  id  /INPUT 
/NODE-node  id  /OUTPUT  /OWNER 
/RECEIVING*"/ SENDING  /TRANSLATE  /VAX 

Qualifiers:  /ALL  -  display  all  COS  jobs 

/CLAS*  -  display  jobs  and  datasets  of  a  specific 
job  class 
(default:  /ALL) 
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SUBHIT 


/CYCL  -  cycle  the  display  refresh  through  all 
available  inforaation 

/NOCY  -  display  only  the  current  page  until  you 
enter  "+H  or 
(default:  /NOCYCLE) 

/EXEC  -  display  the  execution  queue  status 
(default:  /EXECUTION) 

/HOLD  -  display  COS  datasets  in  the  hold  queue 

/ID"  -  display  jobs  and  datasets  originating 
from  a  specific  aainfraae 

/INPU  -  display  the  input  queue  status 

/NODE"  -  display  the  entries  for  a  specific  DECnet 
node 

/OUTP  -  display  the  output  queue  status 

/OWNE  -  display  only  your  jobs  and  datasets 

/RECE  -  display  the  Cray  receiving  queue  status 
(default:  /RECEIVING) 

/SEND  -  display  the  Cray  sending  queue  status 
(default:  /SENDING) 

/TRAN  -  display  terainal  ID  field  (TID)  as  the 
VMS  UIC  equivalent 

/NOTR  -  display  TID  in  the  station  internal  form 
(default:  /TRANSLATE) 

/VAX  -  display  only  COS  jobs  related  to  this 

VAX/VHS  station  (or  network  of  stations) 

See  also:  ISTATUS,  JSTAT 

Similar  commands:  NOS  ICF:  /STATUS 

Examples:  STATUS 


Stage  a  VMS  file  to  the  COS  input  queue. 

Syntax:  SUBMIT  file_spec  /AFTER-time  /EOF-eof  /PRINT 

SUBMIT  fl,f2, . . .  /AFTER-time  /EOF-eof  /PRINT 

Parameters:  file  spec  ~  single  VMS  file  with  a  complete  COS 

job 

fl,f2,...  -  two  or  more  filos  to  be  combined  to 
create  a  complete  COS  job 
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Qualifiers:  /AFTER*  -  specify  when  the  job  is  to  be  sent  to 

the  Cray 

/EOF*  -  specify  what  represents  an  end-of-file 
(e.g.,  /E0F-"E  0  F") 

(default:  /E0F-"/E0F") 

/PRINT  -  print  the  job's  output"' file  on 
COS  job  coapletion 

/NOPRINT  -  put  the  COS  job's  output  into  your 
VMS  file  C0S_ j obnaae . CPR 

(default:  /NOPRINT) 


Reaarks:  The  file  aust  contain  a  COS  job.  By  default,  the 

job's  output  (including  the  dayfile)  is  sent  to 
the  originating  directory. 

Siailar  coaaands:  NOS:  CSUBKIT 

Exaaples:  CRAY>  SUBMIT  ayjobl 

-or- 

$  CRAY  SUBMIT  ayjobl 


CRAY>  SUBMIT  ayjob2.ayprog2.for.aydata2.dat 
-or- 

5  CRAY  SUBMIT  ayjob2,ayprog2. for.aydata2.dat 


SNITCH  Set  or  clear  COS  job  sense  switches. 

Syntax:  SWITCH  jsq  saw  /OFF 

SWITCH  jsq  ssw  /ON 

Paraaeters:  jsq  -  the  COS  job  sequence  nuaber 
ssw  -  the  sense  switch  nuaber  (1-6) 

Qualifiers:  /OFF  -  turn  switch  <ssw*  off 
/ON  -  turn  switch  <ssw>  on 

Reaarks:  These  switches  can  be  used  for  prograa 

synchronization  on  the  Cray. 


Exaaples 


CRAY*  STATUS 

CRAY*  SWITCH  9876  3  /ON 


< —  to  get  the  jsq 
< —  turn  on  switch  3 
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*****  Appendix  D  ***** 

***  CDC  NOS  JCL  Commands  *** 

CDC  NOS  JCL  coaaands  have  the  following  general  syntax: 

verb, par ami, param2, . . . .  coaments 

verb  (paraml ,  par  aa>2  fee*)  CO  assents 

verb  is  the  naaie  of  the  routine  to  be  executed.  It  consists  of  an 
alphabetic  character  (A -2)  followed  by  0-6  alphammeric 
characters  for  the  name  of  the  command. 

paraaii  are  parameters,  which  may  be  positional  or  keyword. 

eoments  follow  the  terminator  (a  period  or  right  parenthesis  ")"). 

***  Strings  *** 

The  following  string  representations  are  used  in  this  appendix: 
aa. ..a  1  or  more  alphabetic  characters 

axx...x  1  or  more  alphanumeric  characters,  the  first  alphabetic 

xxx... x  1  or  more  alphanumeric  characters 

nn...n  1  or  more  decimal  (unless  otherwise  stated)  digits 

nn...nB  1  or  more  octal  digits 

nn...nD  1  or  more  decimal  digits 
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***  Soae  Common  Parameters  *** 

The  following  paraaeters  are  used  in  many  JCL  coaaands.  If  they 
have  a  different  aeaning  or  a  special  condition,  it  will  be  mentioned 
in  the  individual  description. 

CM-nnnnnn  Maximum  central  aeaory  field  length,  octal  unless  D  suffix 
or  8  or  9  in  nuaber,  maximum  376500 

CT“ct  File  permit  Category  Type 

ct  aeaning 


P  or  PR  or  PRIVATE  private 

S  or  SPRIV  semiprivate 

PU  or  PUBLIC  public 

JSN“jsn  Job  Sequence  Naae  (aaaa) 

lfn  Local  File  Naae  (xxxxxxx,  7  maximum) 

(lfn's  starting  with  ZZ  are  reserved  to  NOS) 

lfn_in  Input  local  file  naae 

(noraal  default  is  INPUT) 

lfn_out  Output  local  file  naae 

(noraal  default  is  OUTPUT) 

L"lfn  Output  listing  file  (xxxxxxx,  7  maximum) 

(noraal  default  is  OUTPUT) 

M“m 

a  File  permissions  (file  access  node) 

a  aeaning 


E  (EXECUTE)  you  can  execute; 

others  can  read  or  execute  concurrently 
R  (READ)  all  can  read  or  execute  concurrently 

RU  (READUP)  all  can  read  or  execute; 

one  (other)  user  can  rewrite  the  file 
RA  (READAP)  all  can  read  or  execute; 

one  (other)  user  can  lengthen  the  file 
RM  (REAM®)  all  can  read  or  execute; 

one  (other)  user  can  lengthen  or  rewrite 
the  file 

U  (UPDATE)  all  can  read  or  execute; 

you  can  rewrite  the  file 
A  (APPEND)  all  can  read  or  execute; 

you  can  lengthen  the  file 
K  (MODIFY)  all  can  read  or  execute; 

you  can  lengthen  or  rewrite  the  file 
W  (WRITE)  you  can  read,  execute,  lengthen,  rewrite, 
or  shorten  the  file; 
others  have  no  concurrent  access 
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NA 

non-null 

pfn 

PW*»pas  sword 

UJN-ujn 

UN-un 


No  abort  on  errors 

Indicates  that  the  paraaeter  the  presence  of  a  string  of 
characters  (normally  xxxxxxx,  7  maximum) 

Permanent  File  Name  (xxxxxxx,  7  maximum) 

(normal  default  is  the  lfn) 

password  for  access  to  another  user's  permanent  file 
User  Job  Name  (xxxxxxx,  7  maximum) 

User  Name  (xxxxxxx,  7  maximum) 
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***  Suaaary  of  CDC  NOS  JCL  Commands  *** 

The  following  are  NOS  JCL  statements,  except  as  indicated  by: 

(DTRC)  A  command,  procedure  or  program  added  at  DTRC 

(1AF)  InterActive  Facility 

(ICF)  Interactive  Cray  Facility  (ICF) ; 

begin  with  a  slash  (/) ,  not  to  be  confused  with  the  IAF  prompt 

JCL  statements  for  certain  NOS  features  are  indicated  by: 

(CRM)  Cyber  Record  Manager 

(Loader)  Loader  control  statements 

*  Entire  line  is  a  comment. 

Syntax:  ^comment 

See  also:  COMMENT 

Similar  commands:  Cray:  * 

NOS/BE:  COMMENT 
VMS*.  I 

Examples:  *  This  is  a  comment  - 

ctl  (IAF)  Interrupt  the  current  job  step  (user-break-1). 

Syntax:  ctl 

Parameters:  ct  -  the  network  control  character 

(normally  percent  CO) 

Remarks:  Some  terminals  require  that  AS  be  entered  before 

and  AQ  after  this  command. 

Examples:  21 

ct2  (IAF)  Terminate  the  current  job  step  (user-ureak-2) ;  cancel 

the  output  in  progress. 

Syntax:  ct2 

Parameters:  ct  -  the  network  control  character 

(normally  percent  (X)) 

Remarks:  Some  terminals  require  that  AS  be  entered  before 

and  AQ  after  this  command. 


Examples 


Z2 
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ctD  (IAF)  Immediately  detach  a  terminal  job  from  the  terainal. 

Syntax:  ctD 

Parameters:  ct  -  the  network  control  character 
(normally  percent  00) 

Remarks:  To  detach  during  output,  interrupt  the  output, 

then  enter  ctD. 

Any  type-ahead  commands  are  discarded. 

Examples:  ZD 

ctE  (IAF)  Immediate  detailed  job  status. 

Syntax:  ctE 

Parameters:  ct  -  the  network  control  character 

(normally  percent  00) 

Examples:  ZE 

ctS  (IAF)  Immediate  abbreviated  job  status. 

Syntax:  ctS 

Parameters:  ct  -  the  network  control  character 

(normally  percent  00) 

Remarks:  Response  is  one  of:  EXECUTE,  IDLE  (waiting  for 

you),  or  WAIT  (waiting  for  system  resources). 

Examples:  ZS 

ACCESS  (IAF)  Select  the  ACCESS  subsystem. 

Syntax :  ACCESS 

Remarks:  Required  to  communicate  with  another  interactive 

terminal  (DIAL,  WHATJSN) 

RUN  will  not  work  in  the  access  subsystem. 

Examples:  ACCESS. 

WHATJSN. 

DIAL, jsn, message. 
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APPEND 


APPSW 


Append  information  to  the  end  o£  an  indirect  £ile  without 
retrieving  the  file. 

Syntax:  APPEND, pfn, lfn  1 , lfn_2, . . . , lfn_n/UN*un,PW“pw, 

NA.WB. 

Parameters:  UN-un  -  required  only  for  files  in  another 

catalog 

PW*>pw  -  Required  for  files  with  passwords  in 
another  catalog 

WB  -  wait  for  a  busy  file 

Remarks:  You  cannot  append  to  a  direct  file. 

You  cannot  append  to  a  direct  access  (random) 
file. 

Similar  commands:  NOS/BE:  EXTEND  (for  attached  PF) 

VMS:  APPEND 

Examples:  APPEND, myperm, newl ,nu2. 


(IAF)  Switch  temporarily  to  an  altemame  NAM  application 
program. 

Syntax:  APPSW, AP~appl ,Z. data 

APPSW, appl.Z, data 

Parameters:  appl  -  a  NAM  application 

appl  meaning 


IAF  InterAetive  Facility 

ICF  Interactive  Cray  Facility 

RBF  Remote  Batch  Facility 

Z  -  any  characters  following  the  terminator 

are  passed  to  the  secondary  application  as 
data 

data  -  first  50  characters  after  the  terminator 
are  passed  to  the  secondary  application 

Examples:  APPSW, ICF.  < —  go  into  Cray  Interactive  Facility 
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ASCII  (IAF)  Set  terminal  to  ASCII. 

Syntax:  ASCII 

Remarks:  ASCII  support  is  128  characters  (95  graphics  plus 

33  controls)  in  6/12-bit  display  code. 

See  also:  CSET,  NORMAL 

Examples:  ASCII 


ASSIGN  Assign  a  file  to  a  device. 


Syntax: 

ASSIGN,nn, lfn, ckpt. 

Parameters: 

nn  -  device 

or  device  type  for  assignment 

type 

equipment 

MS 

mass  storage  device  (a  disk) 

MT 

7-track  magnetic  tape 

NE 

null  equipment 

NT 

9-track  magnetic  tape 

TT 

interactive  terminals 

(only  interactive  origin  jobs) 

lfn  -  the  file  to  be  assigned 

ckpt  -  lfn  is  to  be  a  checkpoint  file 
ckpt  meaning 


CK  put  each  dump  at  end  of  lfn 

CB  put  each  dump  at  beginning  of  lfn 

See  also:  FILE 

Similar  commands:  Cray:  ACCESS 

NOS/BE:  CONNECT;  DISCONT;  REQUEST 

Examples:  ASSIGN, MS, OUTPUT.  < —  direct  output  to  a  disk 

file  until  returned  or 

reassigned 

ASSIGN, TT,XYZ.  <—  assign  file  XYZ  to 

your  terminal 


ATTACH  Assign  a  direct  permanent  file  to  a  job. 

ATTACH, lfn  l*pfn  l,lfn  2»pfn_2, . . . , lfn  n-pfn  n 
/M-m7UN-un7PW-pw7NA, RT, WB . 


Syntax 
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Parameter*:  lfn_i*pfn_i  -  if  lfn_i  is  omitted,  pfn_i  is  used; 

if  lfn_i  exists,  it  is  discarded 

M-m  -  (default:  M-READ) 

UN-un  -  required  for  a  file  in  another  catalog 

PW«pw  -  required  if  UN  is  specified  and  the  file 
has  a  password 

RT  -  real-time  processing  (job  continues  after 
requesting  staging  from  the  MSS  -  a 
second  ATTACH  is  required  to  access  the 
staged  file;  if  no  staging  is  necessary, 
the  file  is  assigned  immediately) 

WB  -  wait  for  a  busy  file 

See  also:  GET,  FETCH  (Cray) 

Similar  commands:  Cray:  ACCESS;  ACQUIRE 

NOS/BE:  ATTACH 
VMS:  no  local  file  concept 

Examples:  ATTACH, MYFILE/M-W. 

A~  allows  file  MYFILE  to  be 
overwritten  (such  as  after 
editing) 


BASIC  (IAF)  Select  the  BASIC  subsystem. 

Remarks:  Use  FSE  and  X, BASIC. 


BASIC  See  X, BASIC  to  compile  a  BASIC  program  without  entering  the 
BASIC  subsystem. 


BATCH  (IAF)  Select  the  BATCH  subsystem. 

Syntax:  BATCH, fl 

Parameters:  fl  -  initial  running  field  length  for  subsequent 
commands 
(default:  0) 

Remarks:  This  is  the  default  subsystem  when  you  enter  IAF. 


i 


Examples 


BATCH 
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BEGIN  Transfer  control  to  a  procedure. 


Syntax: 

BEGIN, pname, pf ile.pl ,p2, . . . ,pn. comment 

(1) 

-pname, pfile, pi, p2, . . . ,pn. comment 

(2) 

pname, pi, p2, . . . ,pn. comment 

(3) 

pfile, pi, p2, . . . ,pn. comment 

(A) 

Parameters:  pname  -  the  naae  of  the  procedure  to  be  executed 

(default:  the  procedure  at  the  current 
position  in  the  file) 

pfile  -  the  file  containing  the  procedure 
(default  aearch  order: 

1)  local  file  PROCFIL 

2)  your  permanent  file  PROCFIL 

3)  publ ic~acceas  procedure  file 
PROCFIL/UN-LIBRARY) 

(note:  the  aearch  order  ia  different 
from  NOS/BE,  which  doea  not 
include  item  2) 

(note:  if  you  have  a  local  or  permanent 
file  PROCFIL,  you  cannot  acceaa 
any  of  the  public  procedure*, 
therefore,  uae  another  filename 
for  your  procedure*) 

pi  -  an  optional  parameter 

comment  -  value  aaaociated  with  the  CK  keyword  in 
the  procedure  header 

Remark*:  Except  for  interactive  execution  of  a  procedure, 

the  BEGIN  atatement  may  be  continued  on  more  than 
one  line. 

For  interactive  procedure*,  a  question  mark  "?" 

may  be  used: 

.  for  a  list  of  parameters: 

BEGIN , pname , pf i 1 e , ? 

.  for  help  with  a  parameter: 

BEGIN, pname, pfile, pi . pi? 

.  for  help  during  interactive  processing: 
param? 
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To  accept  the  default  value  for  a  parameter 
during  interactive  processing,  press  the  carriage 
return. 

To  accept  the  default  value  for  the  current  and 
all  remaining  parameters,  enter  a  terminator.  If 
any  required  parameters  remain  undefined,  you 
will  be  prompted  for  them. 

See  also:  REVERT 

Similar  commands:  Cray:  CALL 

NOS/BE:  BEGIN 
VMS:  ^filename 

Examples:  GET,HYPF,MYPROCFILE/UN-xxxx. 

BEGIN, MYPROC.MYPF. 

A —  a  user  procedure 


BEGIN, NEWCHRG. 

A —  a  public-access  procedure  in 
PROCFIL/UN-LIBRARY 


BELOAD  Selectively  load  files  from  a  NOS/BE  tape  created  by  DUMPF  or 

BEGIN, SELDUKP. 

Syntax:  BELOAD, I- i,L-l,T«t, OP-op. 

Parameters:  I*  -  input  file  of  directives 
(default:  INPUT) 

T-  -  local  file  name  of  the  tape 
(default:  TAPE) 

OP*  -  load  option  for  directives  with  PF* 
op  meaning 

N  normal  restore  (don't  replace 
existing  file) 

R  replace  specified  file  if  it  already 
exists 
(default:  N) 

Directives:  ID-id,FN-fn,PF-pf ,CY-cy,CT-ct,TY-ty,PW-pw,M-m. 

ID-  -  the  NOS/BE  ID  (required) 

FN-  -  the  NOS  filename 

(also  requires  PF-) 

PF-  -  the  NOS/BE  filename  (consisting  of  letters 
and  digits  only!) 
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CY-  -  the  NOS/BE  cycle  nuaber 

(default:  the  highest  cycle  only) 

TY-  -  the  NOS  file  type 
ty  aeaning 

D  direct 
1  indirect 
(default:  D) 

PW-  -  the  NOS  password  for  the  file 
Hr  -  the  NOS  access  aode 
(default:  R) 

Reaarks:  BELOAD  is  in  library  BETONOS/UN-LIBRARY . 

Siailar  coaaands:  NOS/BE:  LOADPF,  BEGIN, SELLOAD  (DTRC) 

VMS:  BACKUP 

Exaaples:  ATTACH, BETONOS/UN-LIBRARY. 

LIBRARY , BETONOS/A. 

LABEL , TAPE , VSN-NA98  76 ,  D-GE , F-S , LB-KL , R , PO-R . 
BELOAD, I-fylist. 

UNLOAD, TAPE. 

LIBRARY, BETONOS/D. 

where  fylist  contains: 

ID-abcd, FN-ayf yl 1 , PF-aynosbef yl 1 . 

ID-abcd, FN-ayf yl2, PF-aynosbe£yl2 .CY-423 , TY-I . 
ID-abcd, FN-ayf yl3 , PF-aynosbef yl3 , CT-PU. 


BKSP  Backspace  a  file  (by  logical  records). 

Syntax:  BKSP, lfn,n,a. 

Paraaeters:  lfn  -  the  file  to  be  backspaced 

n  -  decimal  nuaber  of  logical  records  to 
backspace 

(Default:  1;  aax:  262143) 

a  -  file  aode:  C  (coded)  or  B  (binary) 
(Default:  B) 

Siailar  coaaands:  Cray:  SKIPF,  SKIPR 

NOS/BE:  BKSP,  SKIPB 


Exaaples 


BKSP.ayf ile,4 
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BLANK  Blank  label  a  magnetic  tap*. 

Syntax :  BLANK , VSN-v*n , NT  j  NT , D-den | den , CV-cv , FA-f  a , 

OFA*of a , VA*va , OWNER"us  ername/ f ami lynaae , 
LSL**lsl  ,U. 

Parameter!:  VSN«  -  1~  to  6~character  volume  serial  number 

(don't  use  a  current  local  file  name  or 
the  file  will  be  lost) 


MT 

-  7-track  tape 

NT 

-  9-track  tape 

D“den 

-  tape  density 

den 

MT 

NT 

den 

density 

den  density 

LO 

200  cpi 

HD  800  cpi 

HI 

556  cpi 

PE  1600  cpi 

HY 

800  cpi 

GE  6250  cpi 

200 

200  cpi 

800  800  cpi 

556 

556  cpi 

1600  1600  cpi 

800 

800  cpi 

6250  6250  cpi 

CV- 

-  conversion  mode  for  9-track  labels 

(do  not  use  with  MT) 

cv 

meaning 

AS 

ASCII/6-bit 

display  code 

US 

same  as  AS 

EB 

EBCDIC/6-bit 

:  display  code 

FA*  -  File  accessibility  character 


fa 

meaning 

blank 

unlimited  access 

A 

only  the  owner  can  access  it 

other 

future  accesses  must  specify 

this  character 

OFA"  -  old  file  accessibility  character  when 
relabelling  a  tap*  with  one 

VA“  -  volume  accessibility  character 

va  meaning 


blank  unrestricted  access 

other  only  a  system  job  can  destroy 

the  VOL1  label 

(must  always  be  a  labelled  tape) 
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OWNER*  -  ownerahip  identification  -  determine* 
file  acceaaibility  (FA) 

LSL*  -  label  atandard  level  entered  in  V0L1 
label 

lal  meaning 


1  tape  labela  and  data  format 

for  thia  volume  are  ANSI  atd 
blank  may  or  may  not  be  ANSI 
(Default:  1) 

U  -  unload  after  blank  labelling 

(Default:  do  not  unload) 

Similar  commanda:  Cray:  no  tapea 

NOS/BE:  conaole  operator  command 
VHS:  MOUNT 

Examp 1 ea :  BLANK , VSN-NA9999 , D-GE . 


BLOCK  Add  one  or  more  linea  of  10x10  block  letter*  to  a  file. 

Syntax:  BLOCK, lfn, rewind, ec./line_l/line_2/ . . ./line_n 

Parameter*:  rewind  “  rewind  option 

R  -  rewind  lfn  before  writing 
NR  -  do  not  rewind  lfn 
(Default:  NR) 

cc  ~  carriage  control  character  to  be 
inaerted  before  the  firat  line 
(Default:  1) 

/  -  a  delimiter  character  which  aeparate* 

the  line*  in  the  command  -  may  be  any 
character  and  muat  immediately  follow 
the  terminator  -  aucceaaive  delimiter* 
generate  blank  linea 

1 ine_i  -  a  atring  of  up  to  10  character*  for  one 
line  of  blocked  chart cter*  -  or  one  of 
the  following: 

DATE  -  current  date 
TIME  -  current  time 
USER  -  current  uaer  name 
UJN  -  uaer  job  name 
JSN  -  job  aequence  number 
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BYE 


CATALOG 


Similar  commands:  NOS/BE: 

VMS: 


BANNER,  BANNER 3 ,  BANNER6 ,  BANNERS 
(all  DTRC) 

VSYS: BANNER,  VSYS:BANNER6 


Example#:  BLOCK, blockf . *myj ob*date  < —  *  is  the  delimiter 


(IAF)  Terminate  an  application. 

Syntax:  BYE.appl 

Parameters:  appl  -  if  IAF  is  your  primary  application,  appl 

is  one  of:  IAF,  RBF  (see  APPSW) 

if  IAF  is  your  secondary  application,  appl 
is  one  of: 

appl  meaning 


omitted  end  IAF  and  return  to  primary 
application 

ABORT  end  both  primary  and  secondary 
applications 

(anything  else  will  be  treated  the  same  as 
if  omitted) 

See  also:  GOODBYE,  LOGOUT;  HELLO,  LOGIN 

Similar  commands:  Cray:  AZ,  QUIT 

NOS/BE,  VMS:  LOGOUT 


Examples:  BYE 


List  information  about  each  record  in  a  file. 

Syntax:  CATALOG, If n,p_l ,p_2 . p_n. 

Parameters:  lfn  -  the  file  to  be  cataloged. 

pi  ~  parameters 

N"n  -  catalog  n  files 

N“0  -  catalog  until 

double  EOF 

N  ~  catalog  until  EOI 

omitted  -  same  as  N»1 


L-name  -  the  output  file 

omitted  -  same  as  L-OUTPUT 
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CATLIST 


T  -  list  entire  text  for  records 

starting  with  APRS,  CMRD,  EQPD, 
IPRD,  LIBD 

U  ~  list  all  records  in  a  user 

library 

omitted  -  list  ULIB  record 

D  ~  suppress  consents  field  and  all 

but  first  page  heading 

CS  -  suppress  character  set  indicator 
(63/64)  for  OPL  and  OPLC  records 

R  -  rewind  Ifn  before  and  after 

Renarks:  Don't  use  on  S,  L  or  F  tapes.  COPY  then  to  a 

disk  file,  or  to  an  I  or  SI  tape  before 
CATALOGing. 

For  terninal  output,  set  to  NORMAL  node. 

See  also:  ITEMIZE 

Sinilar  cosnands :  Cray,  NOS/BE:  ITEMIZE 

Exanples:  CATALOG, nyfile,N,R. 


List  permanent  file  information. 

Syntax:  CATLIST, LO«lo,FN-pfn,UN“un,NA,L«lfn,PW. 

Parameters:  LO-lo  -  list  options 

lo  meaning 


F  all  information  about  one  or  all 
files  (3  lines  per  file) 

FP  access  permissions  of  a  file 
0  (zero)  alphabetical  list  of  names 

of  indirect  and  direct  files 
P  list  only  names  of  users  who  have 
access  to  a  private  file  or  who 
have  accessed  a  semiprivate  file 
X  LO-F  plus  security  access 

categories  for  one  file 
(default:  0) 

FN-pfn  -  a  single  file  specification  (required  for 
LO-FP,  LO-P,  and  L0*X)  -  one  or  more 
single-character  wildcards  (*)  are 
allowed  (e.g.,  ABC****) 
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L*lfn  -  file  to  receive  the  CATLIST  output 
(Default :  L-OUTPUT) 

PW  -  display  passwords  in  L0“F  output 

Remarks:  In  the  CATLIST  output,  a  filename  enclosed  in 

parentheses  means  the  file  is  on  the  MSS. 

Similar  commands:  Cray:  AUDIT 

NOS/BE:  AUDIT;  BEGIN, AUDIT; 

MSAUDIT;  BEGIN, MSAUDIT 

VMS:  DIRECTORY 

Examples:  CATLIST. 

CATLIST, LO-F,FN«myfile. 

CATLIST, FN-ABC****.  <—  all  files  starting 

with  ABC 


CDROP  (ICF)  Abort  an  executing  Cray  job  saving  the  output. 
Syntax:  CDROP, jsq. 

Parameters:  jsq  -  Cray  job  sequence  number 

See  also:  CSTATUS 

Similar  commands:  VHS  Cray  Station: 

Exampl es :  CDROP , ABCD 


CHANGE  Change  some  characteristics  of  a  permanent  file. 

Syntax:  CHANGE, nfn_l"ofn_l ,nfn__2*ofn_2, . . . ,nfn_n«ofn_n 

/PW-pw , Oct , M-m , BR-br , PR**pr , SS-ss , NA, CE , 
AC-ac,CP. 

Parameters:  nfn_i*ofn_i  -  change  old  file  name  to  new  file 

name 

PW*pw  -  new  password 

0  -  clear  the  password 

M~m  -  alternate  user  permission  mode  for 
semiprivate  and  public  files 
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backup 

requireaents 

br 

meaning 

CR 

off-station  backup 

Y 

on-station  backup 

MD 

backed  up  only  if  on  disk 

N 

no  backup 

(fffi  and  N  are  not  recomaended) 


PR-pr  -  preferred  reaidence 

pr  meaning 


M  alternate  storage  -  MSS 
N  no  preference 

SS~>f  -  new  interactive  subsystem 

(BASIC,  BATCH,  EXECUTE,  FORTRAN,  FTNTS, 
NULL) 

CE  -  clear  file  error  code 

AC“ac  -  aay  alternate  users  obtain  information 
about  the  file?  (Y  or  N) 

CP  -  account  nuaber  is  to  be  replaced  by 

the  account  nuaber  currently  in  effect 

Siailar  coaasnds :  Cray:  ALTACN;  MODIFY 

NOS/BE:  RENAME;  MS CHANG 

VMS:  SET  PROTECTION 

Exaaples;  CHANGE, aynew-ayo Id. 

* —  renaae  a  file 
CHANGE , ayf i 1 e/CT-PU . 

A —  make  a  file  public 


CHARGE  Validate  charging  information  for  the  job. 

Syntax:  CHARGE, account_nuaber . 

Paraaeters:  account_nuaber  -  your  Job  Order  Nuaber 

(10  digits  or  S+9  digits) 

Reaarks:  In  a  batch  job,  the  initial  CHARGE  statement  aus 

iaaediately  follow  the  USER  stateaent  following 
the  job  stateaent. 

The  CHARGE  stateaent  aay  also  be  used  to  change 
the  Job  Order  Nuaber  to  be  used  for  subsequent 
file  saves. 


Pag*  D-18 


RevO 


88/10/01 


Siailar  commands:  Cray:  ACCOUNT 

NOS/BE:  CHARGE 

VMS:  your  hoae  directory  defines  the 

job  order  nuaber 

Exaaples:  jobnaae. 

USER,ABCD,batch_password. 

CHARGE,  1222233344. 

A —  job  charged  to  1-2222-333-44 

e  e  e 

CHARGE, 5666677788. 

DEFINE, NEWFILE. 

A —  file  charged  to  5-6666-777-88 


CJOB  (ICF)  Get  the  status  of  a  specific  Cray  job. 

Syntax:  CJOB, jnaae, jsq,L“lfn,RT“rt. 

Parameters:  jnaae  -  job  naae  from  JOB  stateaent  (uppercase) 

jsq  -  optional  job  sequence  nuaber  (CSTATUS) 

L-  -  local  file  to  receive  the  status 
(default:  OUTPUT) 

RT*  -  repeat  tiae  (seconds) 

(default:  do  not  repeat  the  command) 

See  also:  CSTATUS 

Similar  coaaands:  VMS  Cray  Station: 

Examples:  CJOB, MY JOB. 


CKILL  (ICF)  Delete  an  input  job,  kill  an  executing  job  saving  only 
the  logfile,  delete  an  output  dataset 

Syntax:  CKILL, jsq. 

Parameters:  jsq  -  job  sequence  nuaber 

See  also:  CSTATUS 

Siailar  coaaands:  VMS  Cray  Station:  DROP 
Exaaples:  CKILL, abed. 
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CKP  Take  a  checkpoint  duap. 

Syntax:  CKP, lfn_l, lfn_2, . . . , lfn_n. 

Parameter* :  lfn_i  -  a  file  to  be  included  in  the  checkpoint 

duap 

(Default:  all  local  filea) 

Siailar  coaaands:  NOS/BE:  CKP 
Exaaplea:  CKP. 


CLEAR 


Releaae  all  (or  all  but  one  or  aore  apecified)  filea  aaaigned 
to  the  job. 

Syntax:  CLEAR.  < —  all  filea 

CLEAR,*, lfnl,lfn2, ... , lfnn.  < —  all  except  thoae 

named 

Remarks:  Checkpoint  and  no-auto-drop  filea  are  not 

releaaed. 


See  alao:  RETURN,  SETFS 

Similar  coananda:  NOS/BE:  CLEAR 

Exaaplea:  CLEAR. 

CLEAR, *,keepfyl. 


COBOL5  Compile  COBOL  74  program. 


Syntax:  C0B0L5,B-b,I«i,L-l,L0-lo,PD-pd,SY. 

Parametera:  B-PUNCHB  Produce  punched  binary  decka  of  all 

routinea 

B**lfn  Put  binary  into  a  file 

B  Saae  as  B-BIN 

B»0  No  binary  output 

oaitted  Saae  aa  B-LGO 

I*lfn  FORTRAN  aource  input  it  in  lfn 
I  Saae  aa  I-COKFILE 

oaitted  Saae  aa  I* INPUT 

L-lfn  Output  liata  to  file  lfn 

L"0  Liatinga  are  auppreaaed 

L  Saae  aa  L*LIST 

oaitted  Saae  aa  L-OUTPUT 
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L0-op/op/ , 

. ..  Listing  options  (see  L  parameter) 
op  meaning 

M  address  map 

0  object  code  listing 

(use  only  if  requested  by  Code 
1893) 

R  cross-reference  map 

S  source  code  list 

LO 

Same  as  LO-M/S/R 

LO-O 

No  M,  0,  R,  S  information 

omitted 

Same  as  LO-S 

PD-8 

Print  density  (listings  at  8  lines 
per  inch,  single  spacing) 

PD-6 

listings  at  6  lpi  single  spacing 

PD-4 

listings  at  8  lpi  double  spacing 

PD- 3 

listings  at  6  lpi  double  spacing 

PD 

Same  as  PD-8 

omitted 

Same  as  PD-6 

SY 

Syntax  check  only;  do  not  produce 
object  code 

(cuts  compilation  time  roughly  in  half) 

Similar  commands:  NOS/BE:  C0B0L5 
VMS:  COBOL 

Examples:  C0B0L5.  Defaults  to:  I-INPUT,L-OUTPUT,LO-S,B«LGO 

COBOL5 , I-INP , L-OUTP , LO , S Y , PD-8 . 

COMMENT  Place  a  comment  in  the  system  dayfile  and  the  dayfile  for  any 
of  your  jobs. 

Syntax:  COMMENT, jsn. comment 

COMMENT. comment 
^comment 

Parameters:  jsn  -  jsn  of  job  to  receive  the  comment 

Default:  the  current  job 

comment  ~  the  message  to  be  put  into  the  dayfile 

See  also:  NOTE  (for  on~line  messages  from  a  procedure) 

Similar  commands:  Cray:  * 

NOS/BE:  COMMENT 
VMS:  l 
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Examples :  COMMENT. MARK  1  < —  these  are 

*MARK  1  < —  the  same 


COPY  Copy  data  from  one  file  to  another. 

Syntax:  COPY, I-lfni , 0“lfno, V-x,M“c,TC“tc,N»copycnt , 

BS“bs ize , CCm charcnt , EL“er 1 imi t , 

P0“plp2. . .pn,L“lfnl,NS“ns. 

COPY , 1  £ ni , 1 f no , x , c , t c , copycnt , be ize , charcnt , 
er limit ,plp2. . .pn, lfnl , ns . 

Parameters:  Is  -  file  to  be  copied 
(default:  INPUT) 

0«  -  output  file 

(default:  OUTPUT) 

V-  -  non-null  to  rewind,  copy,  rewind,  verify, 
rewind  both  files  (x  must  not  be  0) 
(default:  no  verify) 

M-  -  coded  files 

c  meaning 


Cl  only  input  is  coded 

C2  only  output  is  coded 

x  both  input  and  output  are  coded 
(x  is  non-null,  except  Cl,  C2) 
(default:  binary) 

TC“  -  termination  condition  with  N" 
tc  meaning 


F  or  EOF  N  is  number  of  files 

I  or  E0I  N  is  ignored 

(copy  to  end-of- informat  ion) 

D  or  EOD  N  is  number  of  double  EOFs  to 
copy  to 

(N>1,TC-D, VERIFY  verifies  only 
to  the  first  empty  file) 
(default:  TC-D) 

N“  -  copy  count  (meaning  determined  by  TC“) 
(default:  N*l) 

BS“  -  maximum  block  size  (in  CM  words)  of  S  or  L 
tape  PRU  (cannot  be  used  with  CC-) 
(defaults:  S  tape:  1000  octal; 

L  tape:  2000  octal) 
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CC-  -  maximum  number  of  characters  in  S  or  L  tape 
block 

(default:  not  used;  size  from  BS“) 

ELm  -  number  of  non-fatal  errors  before  abort; 
EL“U  for  unlimited  error  processing 
(default:  0) 

P0-  -  processing  options: 

pi  meaning 


E  copy  input  blocks  with  parity  or 
block-too-long  errors 
(default:  error  blocks  skipped) 

D  delete  noise  blocks  in  copy  from 

disk,  I-  or  Si-tape  to  S~  or  L-tape 
(defaults:  binary  padded  with  00B  to 
noise  block  size; 
coded  padded  with  blanks) 
R  allow  record  splitting  in  copy  from 
disk,  I-  or  Si-tape  to  S~  or  L~tape 
(default:  splitting  not  allowed) 

M  copy  according  to  TC;  do  not  write 
EOFs 

(default:  write  EOF  after  each  file) 

L"  -  alternate  file  for  parity  error  messages 
for  EL<>0;  cannot  be  same  as  I",  0- 
(default:  OUTPUT) 

NS“  -  noise  size  for  S,  L  or  F  input  tapes 

(maximum:  41;  NS“0  uses  default  of  18) 

Similar  commands:  Cray:  COPYD;  COPYF;  COPYR;  COPYU 

NOS/BE:  COPY;  COPYBF;  COPYCF;  COPYE; 

COPYF;  COPYRM;  COPYSF;  (last  4 
DTRC) 

VMS:  COPY 

Examples:  COPY, a, b. 

COPY, a, b, verify. 


COPYBF  Copy  a  multi-file  file  in  binary  mode. 

COPYBR  Copy  records  from  one  file  to  another  in  binary  mode. 

COPYBF, 1 fn_in, lfn_out ,nf iles , c. 

COPYBR, lfn  in,lfn_out,nrecs,c. 


Syntax: 
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COPYCF 

COPYCR 


Parameters:  nfiles  ~  decimal  number  of  files  to  copy 

nrecs  -  decimal  number  of  recorda  to  copy 

c  -  non-null  indicates  coded  S  or  L  tape 


Defaults:  COP YBF, INPUT, OUTPUT, 1 . 

COP YBR , INPUT , OUTPUT , 1 . 

Remarks:  Not  recommended  for  S  or  L  tapes. 

Copies  from  current  position. 

If  lfn_in“lfn_out,  the  file  is  read. 

See  also:  COPYCF,  COPYCR,  COPYEI 

Similar  commands:  Cray:  COPYD;  COPYF;  COPYU 

NOS/BE:  COP YBF;  COPYBR 

Examples:  COPYBF,fyll,fyl2,4. 

COPYBR, fyll,fyl2, 125. 


Copy  a  coded  multi-file  file. 

Copy  records  from  one  coded  file  to  another. 


Syntax: 


Parameters: 


Defaults: 


COPYCF, If n_in, lfn_out , nfiles, 
fchar , lchar ,na. 

COPYCR, 1 f n_in , 1 f n_out , nrecs , 
fchar, lchar, na. 


< —  6-bit 


< —  6-bit 
<—  6/12-bit 
<—  6/12-bit 


COPYCF, If n_in, If n_out, nfiles, , ,na. 

COPYCR, lfn_in, lfn_out, nrecs, , ,na. 

nfiles  -  decimal  number  of  files  to  copy 

nrecs  -  decimal  number  of  records  to  copy 

fchar  -  first  character  position  of  line  to  copy 

lchar  -  last  character  position  of  line  to  copy 

na  -  non-null  to  not  abort  if  no  line 
terminator  before  EOR 

COP  YCF , INPUT , OUTPUT ,1,1,136. 

COPYCR , INPUT , OUTPUT ,1,1,136. 
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Remarks:  Not  recommended  for  S  or  L  tapes. 

Copies  from  current  position. 

If  lfn_in-l£n_out,  the  file  is  read. 

A  coded  file  contains  lines  of  500  or  fewer 
characters,  terminated  with  a  zero-byte  (12-bits). 

Lines  longer  than  500  6-bit  characters  are 
truncated. 

See  also:  C0PYBF,  C0PYBR,  COPYEI 

Similar  commands:  Cray:  COPYD;  COPYF;  COPYU 

NOS/BE:  C0PYCF,  C0PYCR 

Examples:  C0PYCF,cfyll,cfyl2. 

C0PYCR,cfyll,cfyl2, 2, 7,35,x. 


COPYEI  Copy  one  file  to  another. 

Syntax:  COPYEI, lfn_in, If n_out,x,c. 

Parameters:  lfn_in  -  file  to  be  copied 

lfn_out  -  the  copy  of  the  input  file 

a  -  non-null  to  rewind,  copy,  rewind, 

verify,  rewind  both  files 

c  -  non-null  indicates  coded  S  or  L  tapes 

(default:  binary) 

Defaults:  COPYEI, INPUT, OUTPUT. 

Remarks:  Not  recommended  for  S  or  L  tapes. 

Copies  from  current  position. 

^  lfn_in*lfn_out,  the  file  is  read  to 
end-of- informat ion. 

See  also:  COPY,  C0PYBF,  COPYCF 

Similar  comands:  Cray:  COPYD 

NOS/BE:  C0PYE 
VMS:  COPY 

Examples:  COPYEI, myin.myout. 
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COPYL  Selective  tingle  replacement  of  object  aodulet. 

Syntax:  COPYL, oldfyl , repfyl , newfyl , last , flag. 

Parameters:  oldfyl  ~  old  aaiter  binary  file  of  object  aodulet 

(Default:  OLD) 

repfyl  -  replaceaent  file  of  object  aodulet 
(Default:  LGO) 

newfyl  -  new  aaater  binary  file  of  object  aodulet 
(Default:  NEW) 

laat  -  naae  of  laet  record  in  oldfyl  to  be 
procetted 

(Default:  all  recordt  procetted  froa 
current  pot  it  ion  to  EOF  or 
EOI) 

flag  ~  processing  options 

R  -  rewind  oldfyl  and  newfyl  before 
processing 

(repfyl  it  always  rewound) 

A  -  append  to  newfyl  all  recordt  in 
repfyl  which  do  not  aatch  any  of 
oldfyl 

(Default:  non-aatching  recordt 
ignored) 

T  -  aatch  record  naae  but  not  type 
(Default:  aust  aatch  record  naae 
and  type) 

E  -  process  oldfyl  through  EOI 
(aay  be  selected  in  any  coabination: 

RA,  ART,  TEAR,  etc.,  up  to  four 
characters;  extra  characters  ignored) 
(default:  option  not  selected) 

Defaults:  COPYL, OLD, LGO, NEW. 

Remarks:  Oldfyl  is  processed  forward  only,  but  binary  will 

be  searched  as  often  as  needed. 

See  also:  COPYLM 

Siailar  coaaands:  Cray:  BUILD 

NOS/BE:  COPYL 
VMS:  LIBRARIAN 

Exaaples:  COPYL, oldlgo, lgo.newlgo. 
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COPYLM  Selective  multiple  replacement  of  object  modules. 

Syntax:  COPYLM, oldfyl , binary, newfyl . 

COPYLM, oldfyl, binary ,newfyl , last , flag. 

Parameters:  see  COPYL;  flags  T,  E  do  not  apply  to  COPYLM 

Defaults:  COPYLM, OLD, LGO, HEW. 

ResMrks:  All  occurrences  of  a  module  in  oldfyl  will  be 

replaced  by  the  first  occurrence  of  a  module  with 
the  same  name  in  binary. 

See  also:  COPYL 

Similar  commands:  Cray:  BUILD 

NOS /BE:  COPYLM 
VMS:  LIBRARIAN 

Examples :  COPYLM, oldlgo, lgo,newlgo,R. 

COPYSBF  Copy  a  file,  shifting  the  lines  one  character  to  the  right  for 
printing  on  a  printer. 

Syntax:  COPYSBF, If n_in, lfn_out,nf iles.na. 

Parameters:  lfn_in  -  file  to  be  copied 

lfn_out  -  the  copy  of  the  input  file 

nfiles  -  decimal  number  of  files  to  copy 

na  -  non-null  to  not  abort  if  no  line 

terminator  before  EOR 

Defaults :  COPYSBF , INPUT , OUTPUT , 1 . 

Remarks:  Not  recommended  for  S  or  L  tapes. 

Copies  from  current  position. 

If  lfn_in*lfn_out,  the  file  is  read. 

A  coded  file  contains  lines  of  500  or  fewer 
characters,  terminated  with  a  zero-byte  (12-bits). 

Lines  longer  than  500  6~bit  characters  are 
truncated. 
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COPYX 


A  page  eject  it  inserted  at  the  start  of  each 
logical  record. 

Similar  commands:  Cray:  COPYD 

NOS/BE:  COPYSBF;  COPYSF  (DTRC) ; 

COPYSR  (DTRC) 

VKS:  VSYS:CPYSF  (DTRC) 

Examples:  COPYSBF,myprog. 


Copy  a  file  until  a  user-specif ied  condition  is  met. 


Syntax :  COPYX , 1 f n_in , 1 f n_out , x , b , c . 


Parameters:  lfn_in  -  file  to  be  copied 


lfn_out  -  the  copy  of  the  input  file 


x 


copy  specifications 

x  meaning 


n 

00 

name 

type/name 


decimal  number  of  records 
copy  through  first  zero- 
length  record 
copy  through  this  record 
copy  through  this  record 


-  backspace  control 

x  meaning 


0  no  backspace 

1  backspace  input  file  one  record 
after  copy 

2  backspace  output  file  one  record 
after  copy 

3  backspace  both  files  one  record 
after  copy 

(ignored  if  EOF  or  EOI  before  x  met) 


c  ~  non-null  indicates  coded  S  or  L  tape 

(default:  binary) 


Defaults:  COPYSBF, INPUT, OUTPUT, 1. 


Remarks:  Not  recommended  for  S  or  L  tapes. 

Copies  from  current  position. 

If  lfn_in~lfn_out,  the  file  is  read. 
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A  coded  file  contain!  lines  of  500  or  fewer 
characters,  terminated  with  a  zero-byte  (12-bits). 

Lines  longer  than  500  6-bit  characters  are 
truncated. 

A  page  eject  is  inserted  at  the  start  of  each 
logical  record. 

See  also:  COPYBR,  C0PYCF,  COPYCR 

Similar  commands:  Cray:  C0PYF;  COPYR;  COPY!) 

NOS/BE:  COPYCF 

Examples:  COPYX, fyll, fyl2, 125. 


CRERUN  (ICF)  Immediately  end  processing  of  specified  job, 

delete  output,  and  resubait  to  input  queue,  if  allowed. 

Syntax:  CRERUN, jsq. 

Paraaeters:  jsq  -  job  sequence  nuaber 

Reaarks:  A  job  cannot  be  rerun  if: 

.  a  dataset  has  been  adjusted,  modified, 
saved,  deleted,  or  written  on 
.  RERUN, DISABLE  has  been  executed 

See  also:  RERUN 

Exaaples:  CRERUN, 9876. 


CSET  (IAF)  Change  the  terainal's  character  set  aode. 

Syntax:  CSET, aode 

Paraaeters:  mode  -  one  of: 

ASCII  -  ASCII  128-character  set 
NORMAL  -  ASCII  graphic  64-character  set 

Reaarks:  CSET  may  appear  in  a  procedure. 

See  also:  CSET, NORMAL  does  not  affect  AUTO  or  BRIEF  aode. 


Exaaples 


CSET, ASCI I 
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CSTATUS 


CSUBMIT 


(ICF)  Get  the  atatui  of  jobs,  and  input  and  output  datasets. 
Syntax :  CSTATUS , queues , ST“s  tart ,  L*  1  f  n , RT-r t . 


Parameters:  queues  -  one  or  more  of: 

value 


neaning 


ST- 


E  or  EXECUTION 
I  or  INPUT 
0  or  OUTPUT 
R  or  RECEIVING 

S  or  SENDING 

A  or  ALL 
(Default:  ALL) 


execution  queue 
input  queue 
output  queue 
Cray  mainframe 
receiving  queue 
Cray  mainframe 
sending  queue 
all  of  the  above 


-  decimal  number  of  entries  to  skip  before 
starting  the  display 
(dafault:  0) 


L-  -  local  file  to  receive  the  status 
(default:  OUTPUT) 

RT-  -  repeat  time  (seconds) 

(default:  do  not  repeat  the  command) 


Remarks:  If  RT  is  specified,  12  may  be  needed  to  cancel 

the  output. 


Examples:  CSTATUS. 


Submit  a  job  to  a  Cray  mainframe. 

Syntax:  CSUBMIT, lfn,RB-user, NO, TO. 

Parameters:  If n  -  local  file  containing  the  Cray  job 

(display  code  or  8/12-bit  ASCII) 

RB-  -  (remote  batch  submission)  user  to  receive 
the  output 

RB  -  put  the  output  into  the  print  queue  for  you 
(default:  print  at  Central  Site) 

NO  -  drop  output  at  job  termination 

TO  -  put  the  output  in  the  wait  queue 

Remarks:  Other  parameters  are  available  for  running 

another  user's  job. 
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Similar  commands:  VMS  Cray  Station:  SUBMIT 

VMS:  CRAY  SUBMIT 

Examples:  CSUBMIT,myeray. 

A —  output  to  860  printer 

CSUBMI T , my c  ray , RB-un . 

A —  output  to  un's  output  queue 
(see  QGET) 

CSUBMIT , my cr ay , RB . 

A —  output  to  your  output  queue 
(see  QGET) 


CTASK  Transfers  the  file  between  the  Cray  and  the  CD C  NOS  front-end. 
Syntax:  CTASK, ALL, code. 

Parameters:  ALL  -  include  the  dayfile  from  the  CDC  NOS  job 

with  the  Cray  logfile 

(default:  the  dayfile  is  not  included) 

code  ~  internal  code  of  the  CDC  NOS  file 
ASCI 18  -  8/12-bit  ASCII 
DIS  -  display  code 
(default:  display  code,  unless  the  whole 
job  is  ASCI 18) 

Remarks:  The  text  field  of  a  Cray  ACQUIRE,  DISPOSE  or 

FETCH  statement  can  include  NOS  commands  to  fetch 
or  store  the  file.  CTASK  causes  the  file 
transfer  to  occur. 

Examples:  See  pages  2-1-8,  3-1-3. 

CTIME  Put  the  accumulated  CPU  time  (in  seconds)  into  the  job's 
dayfile. 

Syntax:  CTIME. 

See  also:  RTIME,  STIME 

Similar  commands:  Cray: 

NOS/BE:  PTIM  (DTRC);  SUMMARY 
VMS:  AT 


Examples 


CTIME. 
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DAYFILE  Write  the  job's  dayfile  Cor  a  subset)  to  a  file. 

Syntax :  DAYFILE , L- 1 f n , FR-« tr ing , OP-op , PD-pd , PL-p 1 , 

I”inf ile. 

DAYFILE, lfn, string, op, pd.pl, infile. 

Paraaeters:  L-  -  the  file  to  which  the  dayfile  is  to  be 

written  (on  a  new  page  if  OUTPUT  or  if  PD 
or  PL  specified) 

(Default:  L-OUTPUT) 

FR-  -  search  string  in  field  OP  for  starting  the 
copy.  $~deliaited  if  any  non~alphanuaerics 
in  the  string  (tiae  starts  with  a  blank; 
interactive  coaswnds  start  with  a  for 

example:  $$$OLD$) .  If  found,  the  dayfile 
is  copied  froa  this  point.  If  not  found, 
a  aessage  (connected  or  disconnected  L)  and 
the  entire  dayfile  (connected  L)  are 
written. 

OP-  ~  search  option 

°P  meaning 


T  search  tiae  field 

M  search  aessage  field 

I  increaental  dump  (from  point  of  last 

DAYFILE  command) 

F  full  duap 

(Defaults:  OP-M  (FR,  but  no  OP); 

OP-F  (L  disconnected) ; 

OP-I  (L  connected) 

PD-  ~  print  density 

pd  meaning 


3  double  space;  6  lpi 

4  double  space;  8  lpi 

6  single  space;  6  lpi 

8  single  space;  8  lpi 

PL-  page  size 

pd  page  size  defaults 

3  pi  /  2  30  lines 

4  pi  /  2  30  lines 

8  pi  60  lines 

8  pi  60  lines 


I1 


~  file  containing  a  dayfile  for  input 
(Default:  the  active  dayfile) 
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Remarks:  A  paginated  dayfile  cannot  be  used. 

Similar  commands :  Cray:  ECHO 

VMS:  /LOG  qualifier 

Examples:  DAYFILE, ,$  11.21.$,T. 

* —  start  with  the  last  occurrence  of 
11.21.  in  the  time  field 


DAYFILE , I “DAY , FR-$$$GET , STATS . $ . 

* —  start  with  the  last  occurrence  of 
$GET, STATS,  in  the  message  field 

i>  of  the  dayfile  in  file  DAY 


DEFINE  Create  an  empty  direct  permanent  file. 

Syntax:  DEFINE, lfn_l“pfn_l, lfn_2“pfn_2, . . . ,lfn_n“pfn_n 

/PW-pw , CT-c  t , M“m , BR“br , PR“pr , S“space , NA, 
AC-ac . 


Parameters:  See  CHANGE. 


PW-pw  -  a  1-  to  7-character  password  required 
by  others  for  access 


backup 

requirements 

br 

meaning 

CR 

off-station  backup 

Y 

on-station  backup 

MD 

backed  up  only  if  on  disk 

N 

no  backup 

(MD  and  N  are  not  recommended) 
(Default:  Y) 


CT-ct  -  (Default:  CT-PRIVATE) 

PR-pr  -  preferred  file  residence 

pr  meaning 


D  disk 

L  locked  to  disk 

M  alternate  storage  (MSS) 

N  no  preference 

T  tape  alternate  storage 

(Default:  PR-N) 

S“space  -  number  of  PRUs  requested  for  the  file 
(default:  the  minimum  number  of  blocks 
(a  multiple  of  704  PRUs) 
needed  to  hold  the  file) 
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DIAL 


DISPLAY 


Siailar  coaaands: 


Cray: 

NOS/BE: 

VMS: 


SAVE 

REQUEST .REWIND , CATALOG 
CREATE 


Exaaples:  DEFINE, myf ile/CT-PU. 


(IAF)  Send  a  one- line  message  to  another  user. 

Syntax:  DlAL.jsn.sts 

Paraaeters:  jsn  -  job  sequence  number  of  the  receiving 
terainal 

sss  -  the  one-line  aessage 
Remarks:  You  Bust  be  in  the  ACCESS  subsystem. 

No  queuing  takes  place  if  jsn  is  busy. 


See  also:  WHATJSN 

Siailar  coaaands:  NOS/BE:  SEND 
VMS:  PHONE 


Exaaples:  ACCESS 

WHATJSN 

DIAL, jsn, aessage 


Evaluate  an  expression  and  put  the  result  into  the  job’s 
dayfile  in  octal  and  deciaal. 

Syntax:  DISPLAY, expl,exp2, . . . , expn. 

Paraaeters:  expi  -  any  valid  symbol ic  name  or  expression 

Remarks:  The  largest  value  which  can  be  displayed  is  10 

digits. 


See  also:  SET 

Siailar  coaaands:  Cray:  PRINT 

NOS/BE:  DISPLAY 

VMS:  WRITE  SYS$OUTPUT 

Exaaples:  1)  DISPLAY, TIME. 

1253  2345B  <—  if  time  is  12:53 
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2)  SET.R1-99. 

DISPLAY, Rl.  < —  register  R1 

99  143B 

3)  DISPLAY, 143B.  < —  octal  number  with  B 

99  143B 

4)  DISPLAY, 3/2.  < —  integer  division 

1  IB 


DHB  Binary  dump  of  exchange  package. 

Syntax:  DHB, ordinal. 

Parameters:  ordinal  -  an  octal  number  (0-777777)  used  to 

create  the  dump  record  number  (D  plus 
ordinal)  -  ordinal  >  377777  aborts  the 
job  after  the  dump 
(Default:  0  -->  D000000) 

Remarks:  The  dump  is  written  to  file  ZZZZDMB  (an 

unconnected  local  file),  which  is  never  rewound. 

See  also:  DMD,  DMP 

Similar  commands:  Cray:  DUMP JOB, DUMP 

NOS/BE:  DMP 

Examples:  DMB. 


DMD  Dump  the  exchange  package  or  central  memory  in  both  octal  and 

display  code. 

Syntax:  DMD, fwa, lwa.  (1) 

DMD.lwa.  (2) 

DMD.  (3) 

Parameters:  fwa  -  first  word  address  of  memory  to  be  dumped 
(relative  to  RA) 

lwa  -  last  word  address  to  be  dumped 
(relative  to  RA) 

Format  1:  dump  a  specified  range  of  memory 
Format  2:  dump  from  RA+0  thru  specified  lwa 
Format  3:  dump  the  exchange  package  and  40B 

locations  before  and  after  the  program 
address 
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DMP 


DROP 


Remarks:  The  dump  is  written  £our  words  per  line  to  file 

OUTPUT.  Interactively,  it  is  generally  written 
to  file  ZZZDUMP,  which  is  never  rewound. 

See  also:  DMP 

Similar  commands:  Cray:  DUMP JOB, DUMP 

NOS/BE:  DMD 
VMS: 

Examples:  DMD, 50000, 60000. 


Dump  the  exchange  package  or  central  memory  in  octal. 

Syntax:  Same  as  DMD. 

Similar  commands:  Cray:  DUMP JOB/DUMP 

NOS/BE:  DMP 
VMS: 

Examples:  DMP, 47000. 

Drop  any  of  your  executing  or  queued  files  (except  the  job 
issuing  the  DROP  command). 

Syntax :  DROP ,  JSN- j  sn ,  DC-q ,  U JN-u j  n ,  OP-R . 

DROP , j  sn , q , u j  n , R . 

Parameters:  JSN-  -  either  or  both 

UJN-  -  may  be  specified 

DC-  -  disposition  code 


dc 

meaning 

WT 

waiting  jobs 

PR 

print  jobs 

PU 

punch  jobs 

PL 

plot  jobs 

IN 

input  jobs 

EX 

executing  jobs 

ALL 

all  your  jobs 

(Defaults:  none  (JSN-.UJN-  omitted); 

ALL  (JSN-  or  UJN-  specified)) 

OP-  -  drop  executing  jobs  without  EXIT,  but  with 
single-reprieve  processing 
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Similar  commands:  NOS/BE:  DROP;  EVICT;  RILL 

VMS:  STOP 

Examples:  DROP.ABCD.  < —  drop  executing  job  ABCD 

DROP,JSN«ABCD,OP«R. 

A —  drop  executing  job  with 

single-reprieve  but  no  EXIT 
DROP,, PR.  < —  drop  all  print  jobs 

DROP.  <—  invalid  (JSN,  UJN  or  DC 

required) 


ELSE  Terminate  skipping  (false  IF  command  with  same  label) ,  or 

initiate  skipping  (true  IF  cosimand  with  same  label)  to  ENDIF 
with  same  label. 

Syntax:  ELSE, label. 

Parameters:  label  -  alphanumeric  string  (axxxxxxxxx,  1-10 

characters) 

See  also:  IF 

Similar  commands:  Cray:  ELSE;  ELSEIF 

NOS/BE:  ELSE 

VMS:  ELSE;  ELSEIF  (VMS  5.0) 

Examples:  SET.Rl-l. 


IF,R1-1,D0IT. 

statements  to  do  if  true> 
ELSE, DOIT. 

Statements  to  do  if  false> 
ENDIF, DOIT. 


ENDIF  Terminate  skipping  by  a  SKIP,  IF,  or  ELSE  command  with  a 
matching  label. 

Syntax:  ENDIF, label. 

Parameters:  label  -  alphanumeric  string  (1-10  characters, 

starting  with  a  letter) 

See  also:  ELSE,  IF 

Similar  commands:  Cray,  NOS/BE:  ENDIF 

VMS:  ENDIF  (VMS  5.0) 


Examples 


See  IF. 
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ENDW  The  end  of  a  WHILE  loop. 

Syntax:  ENDW, label. 

Parameters:  label  -  alphanumeric  string  (1-10  characters, 

starting  with  a  letter) 

See  also:  WHILE 

Similar  commands:  Cray:  ENDLOOP 

NOS/BE:  ENDW 

Examples:  WHILE, Rl<5, DOIT. 

e  e  e 

SET.R1-R1+1. 

ENDW, DOIT. 


ENQUIRE  Get  information  about  your  jobs. 

Syntax:  ENQUIRE, OP-plp2. . .pn, FN-lfnl ,0-lfn2. 

ENQUIRE, plp2. . .pn. 

ENQUIRE , JSN- j  sn , 0- 1 f n2 . 

ENQU IRE , UJN-uj n,0-lfn2. 

ENQUIRE. 

Parameters:  OP**  -  Up  to  7  of  the  following  options: 

pi  meaning 


A  same  as  BDRUJLF 

B  identification  and  priority  info 

D  resources  demanded  and  assigned 

F  status  of  files  assigned  to  your  job 

J  contents  of  control  registers,  error 
flags  fields,  succeeding  commands 
L  loader  info  including  status  of  CID 
R  amount  of  resources  used  (CPU  time, 
mass  storage,  perm  file,  and  adder 
activity,  SRUs  used) 

S  accumulated  SRUs 

T  accumulated  cpu  time 

U  initial  amount  of  resources 

available  (seconds,  job  step  RSU, 
account  block  SRU,  remaining 
resources  available  for  dayfile 
messages,  commands,  and  mass 
storage) 

(Default:  OP- A) 

JSN-  -  returns  detailed  report  on  this  job 
UJN-  ~  returns  one-line  report  for  each  of  your 
jobs 
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FN-  -  returns  the  status  of  local  file  lfnl 
0-  -  writes  the  output  to  file  lfn2 

(Default:  interactive:  a  2-line  report  on  the 
current  job) 

Similar  commands:  NOS/BE:  ASSETS,  FILES,  FIND,  J,  MYQ,  Q, 

SUMMARY 

VMS:  SHOW  SYSTEM 

Examples:  /ENQUIRE, B  < —  display  system  activity 

/ENQUIRE, JSN  < —  display  all  of  your  jsn's 

/ENQUIRE , JSN-abcd, 0-out 

A —  display  status  and  remaining 
commands  for  job  ABCD;  write 
display  into  file  OUT 
/ENQUIRE  < —  a  2-line  report  on  the 

current  job 

/ENQUIRE, UJN  < —  display  status  of  your  jobs 

ENTER  Enter  a  series  of  commands  on  one  line. 

Syntax:  ENTER. /commandl/command2/. . ./commandn 

Parameters:  /  -  delimiter  -  any  character  not  in  any 

commandi  -  immediately  follows  the 
terminator 

commandi  -  any  NOS  command  (except  interactive 
commands  with  no  batch  counterpart) 

Rerarks:  The  system  supplies  a  terminator  if  it  is  missing 

from  any  commandi. 

Examples:  BATCH  < —  enter  the  batch  subsystem 

$RFL,0.  < —  displayed  on  entry  to  batch 

/ENTER . \get , f prog\f tn5 , i-f prog\map , par t\lgo\ 

\exi t\dmp\rewind, zzzdump\eopy , zzzdump 
A —  (must  fit  on  one  line) 

compile  and  execute  a  program 

ERRMSG  Control  the  display  of  error  messages  in  a  procedure. 

Syntax:  ERRMSG, status. 

Parameters:  status  ~  OFF  -  turn  off  display  of  messages 

ON  -  turn  on  display  of  messages 
(Default:  ON) 

Remarks:  ERRMSG  has  no  effect  in  a  batch  job. 
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Similar  commands:  NOS/BE:  DAY/DAYFILE 
Example*:  ERRMSG.OFF. 

EVICT  Release  file  space  but  not  the  file  assignment. 

Syntax:  EVICT, lfnl, lfn2, . . . . 

Remarks:  If  the  file  is  a  magnetic  tape  or  a  read-only 

disk  file,  the  file  assignment  is  also  released. 

Similar  commands:  NOS/BE:  REWIND, ALTER  (disk) 

VMS:  create  a  new  version  (disk) 

Examples:  EVICT, myfyl. 

EXECUTE  (IAF)  Select  the  execute  subsystem. 

Remarks:  Not  recommended  at  DTRC. 

EXECUTE  (Loader)  Complete  loading,  generate  load  map  (if  requested), 
begin  execution;  or  execute  at  a  specific  entry  point. 

Syntax:  EXECUTE. 

EXECUTE , pname , p 1 i s t . 

Parameters:  pname  -  a  specific  entry  point  at  which  to  begin 

execution 

plist  -  list  of  parameters 

See  also:  LGO,  name 

Similar  commands:  NOS/BE:  EXECUTE 

Examples:  L0AD,lgo. 

EXECUTE. 

EXIT  Resume  processing  commands  after  a  previous  error. 

Syntax:  EXIT. 

Remarks:  When  used  in  a  procedure,  precede  it  with  a  SKIP 

or  REVERT,  because  EXIT  terminates  the  current 
and  all  calling  procedures  without  restoring  the 

registers. 


Page  D-40 


RevO 


88/10/01 


See  also:  NOEXIT,  ONEXIT 

Siailar  commands:  Cray,  NOS/BE:  EXIT 

VMS:  ON  condition 


Exaaples : 


FTN5. 

LGO. 

EXIT. 

COMMENT.  Program  failed. 


EXPLAIN  (IAF)  Retrieve  an  on-line  version  of  a  CDC  manual. 

Syntax:  EXPLAIN, M-manual 

EXPLAIN, manual 

Parameters:  manual  -  the  desired  manual 
See  also:  HELP,  HELPME 

Similar  commands:  NOS/BE:  BEGIN, DOCGET; 

interactive  procedures 
VMS:  HELP 

VMS  Cray  Station:  HELP 

Exaaples:  EXPLAIN. 


FCOPV  Convert  a  file  from  one  character  set  to  another. 


Syntax :  FCOPY , P- l f n , N- 1 f n , PC-cs , NC-cs , PL-1 t , NL- 1 t , 

FL-fl ,LB“lb,R,A. 

Parameters:  P-  -  input  file  to  be  converted 
(default:  OLD) 

N-  -  output  converted  file 
(default:  NEW) 


PC-  -  character  set  of  input  file 

cs  meaning 


ASCII  6/12-bit  display  code  supporting 
ASCII  63-  or  64-char  on  current 

system 

ASCI 18  7-bit  ASCII,  rt-just  in  12  bits 

ASCI 188  8-bit  ASCII,  rt-just  in  8  bits 

ASCII63  6/12-bit  display  code  supporting 
ASCII  63-character  set 


f 
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ASCI 164 

6/12-bit  display  code  supporting 
ASCII  64-eharacter  set 

ASCFL 

8-bit  ASCII  on  S  tapes  (fixed 
line  length,  no  line  terminators) 

DIS 

6-bit  display  code  supporting 

CDC  63-  or  64-char  on  current 

system 

DIS63 

6-bit  display  code  supporting 

CDC  63-character  set 

DIS64 

6-bit  display  code  supporting 

CDC  64-character  set 

EBCFL 

8-bit  EBCDIC  on  S  tapes  (fixed 
line  length,  no  line  terminators) 

(default 

:  ASCII) 

output  character  set 

(default 

:  ASCI 18) 

input  line  terminator 

value 

meaning 

ZB 

zero  byte 

CR 

carriage  return 

FF 

form  feed 

LF 

line  feed 

OS 

unit  separator 

RS 

record  separator 

CRLF 

carriage  return  and  line  feed 

LFCR 

line  feed  and  carriage  return 

n 

specified  octal  character 

(default 

s:  most:  ZB; 

ASCI 188:  US; 

ASCFL,  EBCFL:  no  terminators) 

NL*  -  output  line  terminator 

(defaults:  same  as  for  PL*) 

FL“  -  length  of  fixed  length  lines  for  S  tapes 

(default:  80;  valid  only  for  ASCFL,  EBCFL) 

LB*  -  number  of  lines  per  block 

(default:  3840/fl;  valid  only  for  ASCFL, 
EBCFL) 

R  -  rewind  input  and  output  files  before  and 
after  processing 
(default:  no  rewind) 

A  -  abort  on  errors 

(default:  no  abort) 
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FILE 


Remarks:  Maxima  line  length  it  160  (12-bit  codes)  or 

320  (6-bit  codes).  Longer  lines  are  truncated. 

Files  converted  to  7-bit  ASCII  can  be  printed 
on  a  Central  Site  printer  and  on  some  remote 
batch  printers.  They  cannot  be  listed  at  an 
interactive  printer. 

Examples :  FCOPY , P-my63 , PC-DIS63 , N-my64 , NC-DIS64 , R . 

* —  convert  NOS/BE  63-character  set 
file  to  NOS  64-character  set 
FCOPY ,  P-mya ,  N-mya8 . 

A —  convert  6/12-bit  ASCII  to  8/12- 
bit  ASCII  suitable  for  ROUTE-ing 
with  EC-A9  to  a  printer; 
for  input  to  Cray; 
for  FSE  directives  in  batch 
FCOPY , P-t  ape , N-di sk , PC-ASCFL , NC-DIS , FL- 120 , LB-30 . 

A —  convert  ASCII  foreign  tape  of 

120-character  records  blocked  30 
to  an  internal  display  code  file 

(CRM)  Describe  the  attributes  of  a  file. 

Syntax:  FILE, Ifn, keys. 

F I LE , 1 f n-xxxxxxx , k  ey s . 

Parameters:  lfn  -  file  to  be  described 

-xxxxxxx  -  new  name  for  file 
keys  -  keyword  parameters  for  the  various 
attributes  and  their  values  —  some 
are: 

ASCII-  -  for  interactive  terminals 
0  -  64-char  display  code 

1  -  95-char  ASCII 

2  -  128-char  ASCII 
(default:  ASCII-0) 

BFS-  -  buffer  size 

0  -  system  provides  space 
n  -  octal  buffer  size 
(default:  BFS-0) 

BT-  -  block  type 

I  -  internal 
C  -  character  count 
K  -  record  count 
E  -  exact  record  count 
(default:  BT-I) 

CF-  -  close  file  action 

N  -  no  rewind 
R  -  rewind 

U  -  rewind  and  unload 
(default:  CF-N) 
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CM"  -  conversion  node 

NO  -  no  conversion 
YES  -  convert  external  to 
internal 
(default:  CM-NO) 

CNF-  -  connect  file  flag 

NO  -  disk  or  tape  file 
YES  -  terminal  file 
(default:  CNF-NO) 

DFC"  -  dayfile  control 

0  -  fatal  errors  to  dayfile 

1  ~  errors  to  dayfile 

2  -  notes  to  dayfile 

3  -  errors  and  notes 
(default:  DFC-0) 

EFC"  -  error  file  control 

(same  as  DFC,  except  errors 
written  to  error  file 
ZZZZZEG) 

E0-  -  parity  error  processing 

T  -  terminate  with  fatal 
error 

D  -  drop  bad  data 
A  -  accept  bad  data 
TD  -  same  as  T,  D,  A  plus 
DD  display  the  error 
AD  block  on  error  file 
ZZZZZEG 

(default:  EO-T) 

ERL"  -  trivial  error  count 
0  -  no  limit 
n  -  number  of  trivial 
errors  to  accept 
(max:  551) 

(default:  ERL"0) 

EE"  ”  flush  sequential  files  on 
abnormal  termination 
NO  -  buffers  not  flushed 
YES  -  output  scratch  file 
buffers  flushed 
(default:  FF-NO) 

FL-  -  fixed  length  (RT-T)  or  full 
length  (RT“Z) 

0  -  must  be  defined  for 
open 

n  -  decimal  length 

RT-F:  n  is  10-1310710 
RT-Z:  n  is  1-1310710 
(default:  FL-0) 
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FO- 


LCR- 


LFN- 

LT- 


KBL- 


MRL- 


OF- 


PD- 


RB- 


~  file  organization 
SQ  -  sequential 
WA  ~  word  addressable 
(default:  FO-SQ) 

-  label  creation  flag 

CRT  -  create  new  label 
CHK  -  check  existing  label 
(default:  LCR-CRT) 

~  new  local  File  name 
~  label  type 

UL  -  unlabelled 
S  -  ANSI  standard 
NS  -  nonstandard 
ANT  ~  any  label  type  (no 
user  processing) 
(default:  LT-UL) 

-  maximum  block  length  (in 
characters) 

0  -  BT-I  -  5120 

BT-C  -  5120  (S  tapes) 
BFS-20(L  tapes) 
other  -  error 
n  -  length 

BT“R,E,RT*Z  -  >-  FL+10 
BT-I  -  MBL 

(default:  NBL-0) 

-  maximum  record  length 

0  -  no  maximum 
n  -  maximum  number  of 
characters 
(max:  1310710) 

~  open  file  action 
N  -  no  rewind 
R  -  rewind 
(default:  OF-N) 

“  1/0  processing 
INPUT  -  read 
OUTPUT  -  write 
10  -  read/write 

(default:  PD- INPUT) 

-  records  per  block  for  BT-K 

0  -  same  as  RB-1 
n  -  number  (max:  4095) 
(default:  RB-1) 


t 

► 
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RT-  -  record  type 

W  -  control  word 
F  -  fixed  length 
R  -  record  Bark 
Z  -  zero-byte  terminated 
D  -  decimal  character  count 
T  -  trailer  count 
U  -  undefined 
S  "  system-logical-record* 
(default:  RT-W) 

Remarks:  Other  parameters  include:  BBH,  B8F,  CL,  CP,  Cl, 

HL,  LBL,  LL,  LP,  MFN,  MNB,  MNF,  MUL,  OMIT,  PC, 
PNO,  REL,  RMK,  SB,  SBF,  SPR,  TL,  ULP,  USE,  VF. 

Similar  commands:  NOS/BE:  FILE 

Examples:  FILE,PRT,BT-C,RT-Z,MRL-150. 

A —  zero-byte  terminated  print  file 

FILE, STRANGR , BT-K, RT-F, RB-10, MRL-80 .MBL-800, EO-A, 
ERL- 25 , BFS-5 12 , CM- YES . 

A —  stranger  blocked  coded  tape 

FILE , INPUT , LFN-DATA. 

A —  substitute  alternate  input  file 


FORM  File  Organization  and  Record  Manager. 

Syntax:  FORM, I-dirfyl , B-owncode. 

Parameters:  I-  -  directive  file 

(default:  INPUT) 

B-  -  owncode  routines  to  be  loaded 
(default:  B-0) 

Directives:  Parameters  for  sequential  files  are  shown 
(additional  parameters  are  available): 

Input  file:  INP(lfn,POS-+-n,MAX-n,REW-r) 

lfn  -  the  input  file 

POS-  -  skip  n  logical  records  forward  or 
backward  before  processing 
(range:  1-16383;  default:  no  limit) 

MAX-  -  maximum  number  of  records  to  be  processed 
(range:  1-8,388,607;  default:  no  limit) 
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REM-  -  rewind  at  end 

N  -  no  rewind 
R  -  rewind 

U  -  rewind  and  unload  (tape) 

(default:  R;  ignored  for  INPUT) 

Output  file  (up  to  20):  OUT(lfn,POS-+-n,MAX-n, 

REW-r , BGD-g , SEL-a) 

lfn  -  the  output  file  (up  to  20  OUT  files  nay 
be  specified) 

(default:  OUTPUT) 

POS-  -  same  as  for  INP 
MAX-  -  same  as  for  INP 
REM-  -  same  as  for  INP 

(default:  R;  ignored  for  OUTPUT,  PUNCH, 
PUNCHB) 

BGD-  -  preset  output  record 
X  -  blank  (55B) 

N  -  display  code  zero  (33B) 

B  -  binary  zero 
E  -  floating  point  zero 
C  -  same  as  input  record 
(default:  B) 

SEL-  -  selection  criteria 

ALL  -  copy  all  records  with  QAL 
processing  as  requested 
QRO  -  copy  only  records  meeting  QAL 
criteria 

(default:  SEL-QRO) 

Non-standard  label:  NON ( 1 f n , ORD-n , LEN-n , LBL- 1 i t ) 

Record  qualif ication:  QAL (lfn, condition) 

Record  reformatting:  REF(lfn, entry, entry, .. .) 

entry  -  out_iTm-in_iTm  -  move  input  field  to 

output  field 

out_iTm-literal  -  put  literal  into 

output  field  of  all 
records 

iTm  -  field  specif ication 

i  ~  initial  position  (decimal) 

T  -  field  type 

X  -  character 

(also:  E,  D,  U,  I,  S,  N,  Z) 
m  -  length 

literal  -  dol lar-delimi ted  ($...$) 
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Remarks : 


Print:  PRT(lfn, FMT” f , PGL-n , TOP-n , TTL- 1 i t ) 

lfn  -  the  output  file 
FMT”  -  line  spacing 

1  -  single  space 

2  -  double  space 

3  -  triple  space 

A  -  first  character  of  line  is 
carriage  control 

D  -  dump  the  lines  single  spaced,  100- 
character  lines 

PGL”  -  number  of  print  lines  (including  the 
title  line)  per  page 
(max:  60  (f-1),  30  (f-2) ,  20  (f-3) ; 
default:  60/f) 

TOP-  -  line  of  page  for  the  title 

(range:  2-60;  defaults:  1  (TTL  omitted), 

2  (TTL  given)) 

TTL”  -  the  page  title  (up  to  136  characters) 
(ignored  for  f”D) 

IBM  S/360  magnetic  tape  conversion: 

CON(lfn,RII>”lit,descr. . . , RID-lit ,descr . . .) 

Execute:  XEQ (ERR*e , COL” lit,. . . ,FIN) 

ERR”  -  error  processing  for  un recovered  tape 
parity  errors: 

ASV  -  abandon  FORM  run 
ANO  -  abandon  FORM  run;  get  rid  of 
output  disk  files,  OUTPUT  and 
any  partially  written  tapes 
remain 

CSV  -  continue,  accept  bad  block, 
dump  bad  block  to  ZZZZZEF 
CNO  -  continue,  delete  bad  block, 
dump  bad  block  to  ZZZZZEF 
COL”  -  alternate  collating  sequence 

(up  to  64  characters;  those  not 
specified  collate  equal  and  higher  than 
the  highest  specified) 

FORM  has  many  functions  including  reblocking 
sequential  files. 

FORM  may  also  be  called  from  a  Fortran  or  Cobol 
program. 


FILE  statements  are  used  to  describe  the  file 
blocking. 
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FORTRAN 


FSE 


See  also:  FCOPY  (much  easier  to  use) 

Similar  commands:  NOS/BE:  COPYRM;  FORM 

(IAF)  Select  the  FORTRAN  subsystem. 
Remarks:  Use  FSE  and  FiF5. 


Invoke  the  full  screen  editor. 

Syntax:  FSE , FN“f i le , OP“acces  s , I* input , L~output , 

IP“procedure,WF*workfile. directives 

FSE, file, access , input , output .procedure, 
workfile. directives 


Parameters:  file 


access 


-  local  or  permanent  file  to  be  edited 
(Default:  most  recently  edited  file 

during  job) 

-  character  set  code  and  file  location 


access 

abb 

meaning 

DISPLAY 

D 

6-bit  display  code 

or 

(default  if  your 

NORMAL 

N 

terminal  is  in 
NORMAL  mode) 

ASCII 

A 

6/12-bit  display 
code  (default  if 
your  terminal  is  in 
ASCII  mode) 

ASCII8 

8 

7-bit  ASCII  right- 
justified  in  12 
bits) 

GET 

G 

access  an  existing 
file  (may  be  used 
with  above) 

input  -  input  directive  file 

(Default:  INPUT) 

output  -  output  listing  file 

(Default:  OUTPUT) 


procedure  ~  alternate  FSE  procedure  library 
(Default:  FSEPROC) 
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workfile  -  alternate  FSE  work  file 
(Default:  ZZZWORK) 

directives  -  initial  directives 

(use  to  separate  directives) 

See  also:  DTRC/CMLD-88/15,  "CDC  NOS  Full  Screen  Editor 

(FSE)  User's  Guide" 

Similar  commands:  Cray:  TEDI 

NOS/BE:  NETED;  EDITOR 

VMS:  EDIT/EDT;  EDIT/TPU  (EVE) 

Examples:  FSE.myf ile,G.  < —  GET/ATTACH  existing  file  to 

edit 

FSE.  < —  resume  previous  editing 

session 


FTN5  Compile  Fortran  77  program. 

Syntax :  FTN5 , ANSI-ans i , B-b , BL-bl , CS-cs , DB-db , DO-do , DS-ds , 

E-e , EL-el , ET-et , GO-go , I-i , L-l , LO-1 o ,MD-md , 
OPT-opt , PD“pd,PL"pl , PN-pn, PS-ps , PW-pw,QC“qc , 
REW-rew,ROUND-round,SEQ-seq. 

Parameters:  ANSI-T  Flag  Non-ANSI  (trivial) 

ANSI-F  Flag  Non-ANSI  (fatal) 

ANSI  Same  as  ANSI-T 

ANSI-0  No  ANSI  diagnostics 

omitted  Same  as  ANSI-0 

B-PUNCHB  Produce  punched  binary  decks  of  all 

routines 

B-lfn  Put  binary  into  a  file 

B  Same  as  B-BIN 

B-0  No  binary  output 

omitted  Same  as  B-LGO 

BL  Burstable  list  (each  major  compilation 

section  starts  on  a  new  page) 

BL-0  Compact  list  (new  page  for  first  page 

only 

omitted  Same  as  BL-0 

CS-FIXED  Collating  sequence  fixed  weight  table 
(display  code) 

CS-USER  Height  table  is  user-defined  by 
subroutines  COLSEQ,  HTSET ,  CSOWN 
CS  Same  as  CS-USER  (at  DTRC) 

omitted  Same  as  CS-FIXED  (at  DTRC) 
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DB-op/op/...  Debugging  options 

(ARG-FIXED  not  allowed) 
op  meaning 

ER  generate  code  for  object-time 
reprieve  of  errors 

ID  generate  output  for  interactive 
debug  (requires  0PT-0) 

PHD  post  mortem  dump  facility  is 

used 

SB  check  subscript  bounds 

SL  check  character  substring 

expressions 

ST  same  as  DB-ID  but  no  stylized 
object  code 

TB  full  error  traceback 
DB  Sane  as  DB-ER/ID/PMD/SB/SL/ST/TB 

DB-0  All  options  deselected 

(DB— ER/-ID/-PMD/-SB/-SL/-ST/-TB) 
omitted  Same  as  DB-0  (if  OPT-1,2,3) 

Same  as  DB-ER  (if  OPT-O) 

DO-op/op  DO- loop  interpretation 

op  meaning 


LONG  trip  count  may  be  >  131,071 
OT  at  least  once  through  each  DO 
loop 


DO 

Same  as  DO-OT 

DO-0 

Trip  count  must  be  <-  131,071 
minimum  trip  count  is  0 

and 

omitted 

Same  as  DO-0 

DS 

All  C$  directives  ignored 

DS-0 

All  C$  directives  processed 

omitted 

E-lfn 

Output  error  list  (see  EL)  on 

file  ifn 

E 

Sane  as  E-ERRS 

omitted 

Same  as  E-OUTPUT 

EL-C 

List  catastrophic  errors 

EL-F 

EL-C  plus  fatal  errors 

EL-W 

EL-F  plus  warning  errors 

EL-T 

EL-W  plus  trivial  errors 

EL 

Same  as  EL-F 

omitted 

Same  as  EL-T 
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ET-C 

Abort  job  if  catastrophic  errors  during 
coapilation;  next  control  stateaent  to 
lit  executed  is  the  one  after  EXIT(S)  ! 
if  no  EXIT(S),  job  ends 

ET-F 

Abort  job  if  fatal  or  higher  errors 

ET-W 

Abort  job  if  warning  or  higher  errors 

ET-T 

Abort  job  if  trivial  or  higher  errors 

ET 

Saae  as  ET-F 

ET-0 

Continue  even  if  coapilation  errors 

oaitted 

Saae  as  ET-F  (at  DTRC) 

GO 

Load  and  execute  object  code  without  a 
separate  LGO  (B-0  and  QC  not  allowed) 

GO-O 

Do  not  load  and  execute 

oaitted 

Saae  as  GO-O 

I-l£n 

FORTRAN  source  input  is  in  lfn 

I 

Saae  as  I-COMPILE 

oaitted 

Saae  as  I- INPUT 

L-lfn 

Output  list*  (BL,  L0)  to  file  lfn 
(see  also  E  option) 

L-0 

Listings  are  suppressed 

L 

Saae  as  L-LIST 

oaitted 

Saae  as  L-OUTPUT 

LO-op/op/ 

...  Listing  options  (see  L  parameter) 

op  aeaning 


A  liat  of  variable*,  conaon  block* 
and  attributes 

H  address  aap 

0  object  code  list  (use  only  at 

request  of  User  Services) 

R  cross-reference  aap 

S  source  code  list 


LO 

Saae  as  LO-S/A/R 

LO-O 

No  A,  M,  0,  R,  S  inforaation 

oaitted 

Saae  as  LO-S/A 

MD-T 

Flag  aachine-dependent  usage  (trivial) 

MD-F 

Flag  aachine-dependent  usage  (fatal) 

MD-0 

No  aachine-dependent  diagnostics 

oaitted 

Saae  as  MD-0 

OPT-O 

Fast  coapile  (required  by  DB-ID) 

OPT-1 

Intermediate  optiaization 

OPT-2 

High  optiaization,  slow  coapile 

0PT-3 

OPT-2  plus  potentially  unsafe 

optiaization 

OPT 

Saae  as  OPT-2 

oaitted 

Saae  as  OPT-O 
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PD-8  Print  density  (E,  L  listings  at  8 

lines  per  inch) 

PD“6  E,  L  listings  at  6  lpi 

PD  Saae  as  PD-8 

omitted  Saae  as  PD-6 

PL-<n>  Print  limit  (decimal  maximum  number  of 
records  to  be  written  at  execution  time 
on  file  OUTPUT  (may  be  reset  at 
execution  time  by  specifying  *PL-n, 
where  n  is  the  new  line  limit,  at  the 
end  of  the  execute  statement 
(max:  9  999  999  999) 

PL  Saae  as  PL-50000 

omitted  Same  as  PL-5000 

PN  Page  numbering  of  output  list  is 

continuous 

PN-0  Each  subprogram  starts  with  page  1 

omitted  Saae  as  PN-0 

PS-n  Page  size  (number  of  lines  per  page 

in  compilation  listing)  (n  >-  4) 
omitted  Saae  as  PS-80  (if  PD-8) 

Saae  as  PS-60  (if  PD-6) 

PW-n  Page  width  (number  of  characters  per 

line  in  compilation  listing) 

(50  <-  n  <■  136) 

PW  Saae  as  PH-72 

omitted  Saae  as  PH-72  (if  L  or  E  file  is 
connected) 

Saae  as  PH-136  (ail  other  files) 

QC  Quick  syntax  check  (no  binary  output 

or  cross  reference  addresses) 

(conflicts  with  B,G0,L0-0/M) 

QC-0  No  quick  syntax  check 

omitted  Saae  as  QC-0 

REH-op/op/ . . .  Rewind  option 
op  meaning 

B  rewind  binary  output  file 

(object  code) 

E  rewind  error  file 

I  rewind  input  file 

L  rewind  output  file 

REH  Saae  as  REH-I/B 

REH-0  No  files  rewound 

omitted  Saae  as  REH-0 
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ROUND-op/op/. . .  Rounded  arithmetic  for 
specified  operators 

(op  is  one  of:  A,  S,  M,  D,  for  +,  *, 

and  /,  respectively) 

ROUND  Seas  as  ROUND-A/S/M/D  (at  DTRC) 

ROUND-O  Rounded  arithaetic  not  used 

oaitted  Saae  as  ROUND-A/S/M/D  (at  DTRC) 

SEQ  Sequenced  line  foraat 

SEQ-0  Standard  FORTRAN  foraat 

oaitted  Saae  as  SEQ-0 

Defaults:  FTN5 ,  ANS 1-0 , B-LGO , BL-0 , CS-FIXED , DB-ER , DO-O , DS-0 , 

E-OUTPUT , EL-T , GO-0 , I- INPUT , L-OUTPUT , LO-S/A, 
OPT-0 , PD-6 , PL-5000 , PN-0 , PS-60 , PW- 1 36 , QC-0 , 
REW-0 , ROUND-A/S/M/D, SEQ-0 . 

Siailar  commands:  Cray:  CFT;  CFT77 

NOS /BE:  FTN5;  FTNA 
VMS:  FORTRAN 

Exaaples:  FTN5 , I -ayprog , L-0 , GO .  < —  compile  and  go  with 

no  listing 


GET  Get  copies  of  indirect  peraanent  files  as  local  files. 

Syntax:  GET, lfn_l-pfn  l,lfn  2-pfn  2 , . . . , 1 f n_n-pf n_n 

/UN-un , PH-pw, NA,RT . 

See  also:  ATTACH,  FETCH  (Cray) 

Exaaples:  GET.ayindfl. 

GET,herindf/UN-her_un,PW-her_pw. 


GO  Clear  the  pause  bit  of  one  of  your  jobs. 

Syntax:  GO,jsn. 

Remark s:  The  pause  bit  aay  be  set  by  one  of  your  programs 

or  by  the  PAUSE  coaaand. 

See  also:  PAUSE 

Siailar  coaaands:  NOS/BE:  GO 


Exaaples 


G0,AAXJ. 
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GOODBYE 


GTR 


Terminate  an  application. 

Syntax:  GOODBYE, application 

Remarks:  GOODBYE  can  appear  in  a  procedure  or  a  batch  job, 

where  it  terminates  the  job. 

See  also:  BYE,  LOGOUT;  HELLO,  LOGIN 

Similar  commands:  Cray:  AZ,  QUIT 

NOS/BE,  VMS:  LOGOUT 

Examples:  GOODBYE 


Selective  extraction  of  records  from  a  (library)  file. 

Syntax:  GTR,lfn_l,lfn_2,d,NR,S,NA.dir_l,dir_2, . . . ,dir_n 

Parameters:  lfn_l  -  source  file 

(Default:  OLD) 

lfn_2  -  output  file  (must  be  disk  if  "d"  used) 
(Default:  LGO,  positioned  at  EOI  (disk) 
or  BOI  (tape,  unless  NR) 

d  -  random  access  directory 

omitted  -  no  new  random  access 

directory;  if  ULIB  type, 
first  record  not  copied, 
rest  of  records  copied;  last 
record  of  OPLD  copied  without 
alteration;  no  EOF  written  at 
end  of  file 

U  -  no  new  random  access 

directory;  if  ULIB  type, 
first  record  copied  without 
alteration  with  rest  of 
library  and  OLPD;  no  EOF 
written  at  end  of  file 
D  -  write  random  access  directory 

on  lfn_2  with  entries  for 
selected  records;  if  ULIB 
type,  first  record  copied 
without  alteration  with  rest 
of  library  and  OPLD;  EOF 
written  after  new  directory 
-  same  as  D 
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NR  -  do  not  rewind  lfn_l  after;  do  not  rewind 
lfn_2  before  or  after;  copy  an  existing 
directory  fro®  lfn_l  to  lfn_2 

S  -  search  lfn_l  sequentially 

NA  -  do  not  abort  on  error 


dir_i  -  a  record  or  group  of  records  to  get: 
type/naae 

naae 

type_l/na»e_l-type_2/na«e_2 
type_l/na*e_l~na*e_2 
nane_ 1 -nane_2 

type/naae*-*  (all  type  froa  naae  on) 

naae~*  (all  froa  naae  on) 

type/*  (ail  of  type) 

*  (all  records) 

0  (insert  zero-length  record) 

See  also:  L1BEDIT 


Siailar  coaaands: 


Cray: 

NOS/BE: 

VMS: 


BUILD 

COPYN  (sequential  only) 
LIBRARIAN 


Exaaples :  GTR, SYSTEM, BIN, D.PP/* 

A —  copy  all  PP  records,  build  randoa 
access  directory 

GTR , OPL , NEW , , NR . OPLC/COMCARG , 0 , COMCCIO 

A —  copy  2  records  and  put  a  zero- 
length  record  in  between  then  at 
the  current  position  of  NEW;  NEW 
not  rewound,  OLD  rewound  before 
GTR, SYSTEM, SYSLIB .D.ULIB/SYSLIB 

A —  user  library  SYSLIB  copied  froa 
file  SYSTEM  to  end  of  SYSLIB 
GTR.REL/A  < —  copy  record  A  froa  OLD  to  LGO 


HELLO  (IAF)  Logs  you  out  of  IAF  and  switches  you  to  another 
application,  or  starts  another  login. 

Syntax:  HELLO, application 

Reaarks:  If  IAF  is  a  secondary  application,  HELLO, appl  is 

the  saae  as  BYE, appl. 

If  application  is  omitted,  a  new  login  is 
started. 
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S**  also:  LOGIN;  BYE,  GOODBYE,  LOGOUT 

Siailar  commands:  NOS/BE:  LOGIN 

VMS:  LOGOUT  then  redial 

Exaaples:  HELLO, ICF  < —  switch  to  Interactive  Cray 

Facility 


HELP  (IAF)  Ask  for  help. 

Syntax:  HELP. 

Resiarks:  Displays  a  aenu  and  proapts  for  your  selection. 

Help  features: 

.  list  of  all  NOS  coaaands,  except  coapiler 
calls 

.  help  in  entering  a  command 
.  access  to  on-line  CDC  manuals 
.  list  of  NAM/CCP  network  coaaands 

See  also:  EXPLAIN,  HELPBE,  HELPME 

Siailar  coaaands:  NOS/BE:  BEGIN, DOCGET  (DTRC) 

VMS:  HELP 

Exaaples:  HELP. 


HELPBE  On-line  help  for  the  NOS- equivalent  of  NOS/BE  coaaands. 
Syntax:  HELPBE. 

Reaarks:  HELPBE  is  in  library  BETONOS/UN-LIBRARY . 

Exaaples:  ATTACH, USRLIB8-BET0N0S/UN-LIBRARY. 

LIBRARY, USRLIB8/A. 

HELPBE.  < —  you  will  be  prompted 

LIBRARY, USRLIB8/D. 


HELPME  (IAF)  Display  a  brief  description  of  a  coaaand,  proapt  for 
paraaeters,  execute  the  coaaand. 

Syntax:  HELPME, coaaand 

Paraaeters:  coaaand  -  the  coaaand  you  want  help  with 
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Remarks:  This  is  an  interactive  procedure.  Enter  a 

question  mark  (or  the  HELP  function  key  in  screen 
■ode)  at  any  tine  for  help  during  the  dialog. 

See  also:  EXPLAIN,  HELP,  HELPBE 

Siailar  coman ds :  NOS/BE: 

VMS: 

VMS  Cray  Station: 

Exaaples:  HELPME.FCOPY. 

IF  Conditionally  skip  one  of  aore  coaaands. 

Syntax:  IF, condition. command.  < —  note  two  terminators 

IF, condition, label . 

Synonym:  IFE 

Paraaeters:  condition  -  an  expression  evaluating  to  true  or 

false 

coaaand  -  a  valid  coaaand 

label  -  alphanumeric  string  (1-10  characters, 
starting  with  a  letter) 

Siailar  coasuuids:  Cray,  VMS:  IF 
NOS/BE:  IFE 

Exaaples:  IF (Rl-1, there) 

e  e  e 

ENDIF(there) 

IF, Rl-1. REWIND, fyle. 


Interactive  procedures 
HELP  eCOS  (just  the 
description) 

HELP  8C0S  (just  the 
description) 


ITEMIZE  List  information  about  each  record  of  a  binary  file. 

Syntax:  ITEMIZE, lfn,L-listfyl,BL,PW-n,PD,NR,N-n,E,U. 

Paraaeters:  paraas  -  optional  paraaeters: 

BL  -  burstable  listing  (new  page 
for  each  file  output) 

E  -  list  entry  points  for 
relocatable  modules; 
list  IDENTs  for  UPDATE 
sequential  PL 
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job 


L- 

-  the  output  listing,  if  other 
than  OUTPUT 

N 

-  process  to  end-of-inf ormation 

N-n 

-  number  of  files  to  process 
(default:  1) 

NR 

-  lfn  not  rewound  before  or 
after 

PD 

-  print  density  is  8  lpi 
(default:  6  lpi) 

PW-pw 

-  page  width 
(defaults: 

batch:  136  or  72 
IAF:  72  (output  file 

connected) 

136  (output  file  not 
connected) 

U  -  itemize  all  records  in  a  user 
library 

(default:  only  user  library 
directory) 


Remarks:  Output  includes  record  number,  name,  length, 

prefix  table  for  relocatable  binary  or  user 
library. 

For  a  sequential  UPDATE  PL,  only  deck  names  are 
listed. 

Your  terminal  should  be  in  NORMAL  mode  (not 
ASCII)  before  listing  ITEMIZE  output  at  your 
terminal . 


Defaults:  ITEMIZE, LG0,L-0UTPUT,N-1 ,PW-see  above. 


See  also:  CATALOG 


Similar  commands: 


Cray:  ITEMIZE 

NOS/BE:  ITEMIZE;  LISTBIN  (DTRC) 

VMS:  LIBRARIAN 


Examples:  ITEMIZE, oldpl. 

ITEMIZE , us  er 1 i b , U , L-uout . 


Identifies  requirements  for  a  batch  job. 

Syntax :  u jn, SC-sc , T-t , CM-cm, ST-1 id. punchmode 

u j  n , SCs  c , Tt , CMcm , ST1 i d . punchmode 
u jn, sc, t, cm, lid. punchmode 

ujn,P*p, T-t, CM-cm, ST-1 id. punchmode 
uj n , Pp , Tt , CMcm, ST1 id . punchmode 
ujn,p,t, cm, lid. punchmode 
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Parameters:  sc  -  do  not  use  at  DTRC 


p  -  do  not  use  at  DTRC 

t  -  job  step  tine  limit  in  CPU  seconds 
(Range:  1  to  32767  decinal; 

1  to  77777B  octal) 

(Default:  64  decinal) 

cn  -  maximum  octal  field  length  required 
(Maximum:  376500  octal) 

(Default:  376500  octal) 


lid  -  not  used  at  DTRC 


punchmode  -  in  columns  79-80  of  actual  punched 
cards 

26  -  026  mode 
29  -  029  mode 


Similar  commands:  Cray:  JOB 

NOS/BE:  job  statement 


Examples: 

ABCDjbl,CM75000,T10. 

< —  these  three 

ABCDj b 1 , CM-75000 , T- 10 . 

< —  are  the 

ABCDjbl,. 10, 75000. 

A 

1 

1 

•* 

8 

* 

ABCD. 

< —  all  defaults 

LABEL  Mount  a  magnetic  tape  and,  if  labelled,  check  the  label. 

Syntax:  LABEL, lfn,VSN"V«n_l/vsn_2-. . .-vsn_n-l/vsn_n, 

MT | NT , D-denTF- f  ornat , LB- 1 b , 
FC”fcount,CV«cv,NS“ns,P0«plp2. . .pn,CK|CB, 
SI“setid|M"setid,SN*secno,QN«seqno, 

L*f i 1 e i d , FA*f a , G-genno , E“gvn , 

CR-cdat  e j  C-cdat e , RT-yyddd | T»ddd , W  J  R , 

AC"ac , CT*c  t , MD-md , PW*pw , 

TO“to,UN“username. 

Required  parameter:  lfn  -  local  file  name  for  the  tape  - 

if  lfn  is  already  a  local  disk 
file,  processing  continues  -  if  lfn 
is  already  a  mounted  tape  and  R  is 
present,  the  label  is  checked 

Parameters:  AC*  -  alternate  auditability 

CK  -  lfn  is  to  be  used  as  a  checkpoint  file 
CB  CK  -  append  dump  to  lfn 

CB  -  write  dump  at  BOI  of  lfn 
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CR“  -  creation  date  (yyddd) 
O 


CT« 

-  file 

category 

CV-cv 

-  conversion  mode  for  9-track 

label: 

(do  not  use  with  MT) 

cv 

meaning 

AS 

ASCIl/6-bit  display  code 

US 

same  as  AS 

EB 

EBCDIC/6-bit  display 

code 

D“den  -  tape  density 


MT 

NT 

den 

deni 

tity 

den 

density 

L0 

200 

cpi 

HD 

800 

cpi 

HI 

556 

cpi 

PE 

1600 

cpi 

HY 

800 

cpi 

GE 

6250 

cpi 

200 

200 

cpi 

800 

800 

cpi 

556 

556 

cpi 

1600 

1600 

cpi 

800 

800 

cpi 

6250 

6250 

cpi 

E-  -  1-  to  4-digit  generation  version  number 
(Default:  0) 

F“  -  data  format 


format 

meaning 

I 

internal 

SI 

system  internal  (NOS/BE  tape) 

S 

stranger 

L 

long  block  stranger 

F 

foreign  (unknown  data  format) 

(Default: 

F-I) 

File  accessibility  character 

fa 

meaning 

blank 

unlimited  access 

A 

only  the  owner  can  access  it 

other 

future  accesses  must  specify 
this  character 

FC"  -  maximum  block  size  in  frames  (required 
if  F“F  is  specified) 


1-  to  4-digit  generation  number 
(Default:  1;  0  not  allowed) 


G- 


88/10/01 


RevO 


Page  D-61 


L“  -  1~  to  -17-character  file  label 
(Default:  blank) 

LB“lb  labelled  or  unlabelled  tape 
lb  meaning 

KL  ANSI-labelled 
KU  unlabelled 
NS  nonstandard-labelled 

(assumes  data  starts  immediately 
after  the  first  tape  mark) 

MD“  -  file  mode 

MT  -  7-track  tape 

NT  -  9-track  tape 

NS**ns  -  noise  size  (any  block  shorted  than  ns 

frames  is  discarded);  not  valid  for  F«I, 

F-SI;  D-PE,  or  D-GE 

(Maximum:  31;  NS-0  ■■>  the  default; 

Defaults:  0  (PE , GE) ,  18  (others)) 

PO-  -  processing  options 
po  meaning 

R  Read  the  tape  (ring  OUT) 

W  Write  the  tape  (ring  IN) 

Several  other  options  are  available. 

PW-  -  password 

QN-  -  1-  to  4-digit  file  section  number  of  the 
file  within  a  multivolume  file  set 
(Default:  1;  use  QN-9999  to  append  a  new 
file  to  a  multifile  set) 

R  -  Read  the  label  and  check  specified 

fields 

W  -  write  a  new  label,  if  the  existing  label 

has  expired 

(Default:  R;  ignored  for  F“SI  and  QN>1) 

RT-  -  expiration  date  (yyddd) 

T"  -  retention  number  of  days  (0  to  999) 

SI-  -  1-  to  6-character  file  set  identifier 

(required  for  file  positioning  in  multi¬ 
file  set) 
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SN-  -  1-  to  4-digit  file  aection  number  of  the 
volume  within  a  multivolume  file  set 
(Default:  1) 

TO-  -  TMS  option 

UN-  -  uaer  name 

VSN-  -  1-  to  6-character  volume  aerial  number 

/  -  aeparatea  multiple  reela 

-  -  uae  firat  available  VSN 
(Default:  from  aeparate  VSN  atatement 
preceding  LABEL) 

See  alao:  VSN 

Similar  commands:  Cray:  ACCESS 

NOS /BE:  LABEL 
VMS:  REQUEST, MOUNT 

Ex amp 1 es :  LABEL , tbe , VSN-NA9999.PO-R , F-SI , LB-KU, D-GE. 

A —  read  a  NOS/BE  unlabelled  tape 
at  6250  cpi 


LDSET  (Loader)  Set  option (a)  for  the  current  load. 

Syntax:  LDSET (opt l,opt2, ... , optn) 

LDSET. 

Parameters:  opti  -  option  in  one  of  the  following  forms: 

key 

key-param 

key-par ami /par a® 2/ . . ./paramn 
options  include: 

FILES, lfnl/lfn2/.../lfnn 
probably  not  needed 

LIB-1 ib 1/1 ib2/. . ./libn 

LIBEDIT  libraries  to  be  searched 

MAP-p/lfn 

p  -  one  or  more  of: 

N  -  no  map 

S  -  error  messages  and  loader 
statistics 

B  -  block  list  and  list  of 
unsatisfied  externals 
E  -  entry  point  list  without 
cross  reference 
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Remarks : 

See  also: 
Similar  coi 

Example*: 


X  -  entry  point  list  with 
cross  reference 
(default:  SB) 

lfn  -  the  file  to  hold  the  map 
(default:  OUTPUT) 

PRESET-p 

PRESETA-p 

preset  memory  as  specified: 


p 

octal  preset  value 

NONE 

no  presetting 

ZERO 

0000  0000  0000  0000  0000 

DEBUG 

6000  0000  0004  0040  0000 

NGINF 

4000  0000  0000  0000  0000 

ALTZERO 

2525  2525  2525  2525  2525 
(alternating  0  and  1) 

n 

a  1-20  digit  octal  constant 
with  optional  +  ,  -  and 
terminal  B 

(PRESETA  puts  each  location's  address 
in  the  17  low  order  bits) 

(default:  PRESET-ZERO) 


MAP-S  provides  statistics:  program  length, 
routines  present  and  missing. 

LDSET  without  parameters  will  prompt  you  for  them, 
page  5-6-5 

lands:  Cray:  SEGLDR , PRESET- 

NOS/BE:  LDSET,  XEQ 
VMS:  virtual  memory 

LDSET , PRESETA-DEBUG , MAP-S . 

*--  the  NOS/BE  PRESET  default 


/LDSET 

LDR>?  LDSET. MAP-S. PRESETA-DEBUG. 


LDR>?  LDSET, LIB-DTLIB. 
LDR>?  LOAD, LGO. 

LDR>?  NOGO.ABS. 

/ABS. 


< —  previously  attached 

< —  create  absolute 
< —  execute 
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LENGTH 


LGO 


LIBEDIT 


Gives  the  current  status  of  one  of  your  local  files. 

Syntax:  LENGTH, lfn. 

Remarks:  The  information  includes  is  length  (PROS),  type, 

current  status. 

See  also:  ENQUIRE, FN- lfn. 

Similar  commands:  Cray:  OS 

NOS/BE:  FILES 

Examples:  LENGTH, mylfn. 


(Loader)  Load  and  execute  the  default  compiler  binary  output 
file. 

Syntax:  LGO. 

LGO.plist. 

Parameters:  plist  -  list  of  positional  and/or  keyword 

parameters  for  the  program  being  executed 

See  also:  name 

Similar  comswnds:  Cray:  name 

NOS/BE:  LGO 

Examples:  FTN5. 

LGO. 


Create  and  maintain  a  library  of  programs,  subprograms, 
procedures,  or  text. 


Syntax:  LIBEDIT, P-lfn, N-lfn, I-lfn,Z,B-lfn,L-lfn, 

LO-options,V,C,D,U-record,NA,NI,NR,NX«n. 

Parameters:  P-  -  the  old  file 

P-0  ■>  create  new  file  from  replacement 
files 


N-  -  the  new  file 


I-  -  input  directive  file 
1*0  ■>  no  directives 

Z  -  directives  immediately  follow  the  command 
terminator  (the  first  character  after  the 
terminator  is  the  directive  separator; 
overrides  I-) 
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Directive*: 

Defaults: 


B-  -  replacement  and  insertion  records 
B-0  ->  no  replacement  file 

L  -  summary  of  LIBEDIT  run  and  any  requested 
listings 

L-0  “>  suppress  output 

L0-  -  list  options 

option  meaning 


C  list  directives 

E  list  errrors 

M  list  modifications 

N  list  records  written  to  new  file 

F  full  listing  (same  as  LO-CEMN) 

V  -  verify  new  file  against  old  file  by  calling 
VFYLIB  (U  overrides  V) 

C  -  copy  new  file  over  old  file  when  done 

D  -  do  not  abort  on  processing  errors 

U-  -  old  file  is  a  user  library;  new  file  is 
made  a  user  library  by  call  to  LIBGEN 
(overrides  V)  -  the  value  <record>  becomes 
the  name  of  the  user  library  directory 
record 

U  or  omitted  -  same  a  ULIB  is  used 

NA  -  do  not  abort  on  directive  errors 

NI  -  do  not  insert  unreplaceable  records  at  EOF 
of  new  file 

NR  -  old  and  new  files  not  rewound  before  or 
after 

NX*  -  n-0  -  include  cross  references  in  library 

directory  of  new  user  library 
n<>0  ~  do  not  include  cross  references 
(has  meaning  only  for  U  or  the  *LIBGEN 
directive) 

See  Section  5-5. 

interactive:  LIBEDIT , P-OLD , N-NEW , I- INPUT , B-LGO , 

L-OUTPUT , LO-EM , NX-0 . 

all  others:  LIBEDIT, P-OLD, N-NEW, I- INPUT, B-LGO, 

L-OUTPUT , LO-F , NX-0 . 
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Remarks:  If  the  output  it  to  tape  and  the  tape  nay  be 

processed  at  a  later  date  by  GTR  or  MODIFY, 
put  the  new  file  on  disk  and  COPY  it  to  tape. 
This  will  insure  that  the  directories  have  disk 
PRU  random  addresses  and  not  tape  PRU  random 
addresses. 

See  also:  LIBGEN 

Similar  commands:  Cray:  BUILD 

NOS/BE:  EDITLIB,  COPYN 
VMS:  LIBRARIAN 

Examples:  LIBEDIT,F-LGO,P-mysubs. 


LIBGEN  Create  a  new  user  library  of  routines  for  use  by  the  loader. 

Syntax :  LIBGEN , F- 1 f n , P-1 f n , N-name , NX-n . 

Parameters:  F-  -  source  file  containing  absolute  (ABS) , 

overlay  (OVL) ,  procedure  (PROC) ,  relocatable 
(REL) ,  or  capsule  (CAP)  records 
(no  library  ganeratad  if  none  of  these 
records  is  in  F) 

P-  -  will  contain  the  new  user  library 

N-  -  name  of  the  generated  user  library;  entered 
in  ULIB  and  OPLD  records 
(default:  P-lfn) 

NX-  -  n-0  -  include  cross  references  in  library 

directory  of  new  user  library 
n<>0  -  do  not  include  cross  references 
(default:  NX-0) 

See  also:  LIBEDIT 

Similar  commands:  Cray:  BUILD 

NOS/BE:  EDITLIB 
VMS:  LIBRARIAN 

Examples:  ATTACH, subs. 

FTN5 , I-subs . 

LIBGEN , P-myabs . 
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LIBLOAD  (Loader)  Load  modules  £rom  a  library  which  contain  the 
specified  entry  points. 

Syntax:  LIBLOAD, libname,etpnamel,eptname2, . . . , eptnanen. 

Parameters:  libname  -  the  library  containing  the  desired 

entry  points 

eptnamei  -  a  specific  entry  point  to  be  loaded 

Remarks:  For  a  core  image  load,  only  one  entry  point  any 

be  given. 

See  also:  LOAD 

Similar  commands:  NOS/BE:  LIBLOAD 

VMS :  LINK  ... , 1 ibrary/LIB/INCLUDE- 

Examples:  LIBGEN,F-LGO,P“mysubs. 


LIBRARY  (Loader)  Specify  a  set  of  global  libraries  to  be  searched  for 
externals  and  programs  and  the  order  in  which  they  are  to  be 
considered. 

Syntax:  LIBRARY,filel,file2, . . . , filen/directive. 

Parameters:  filei  -  system  or  user  library 

(a  maximum  of  2  user  libraries) 

directive  -  specify  if  the  files  are  to  be  added 
to,  deleted  from,  or  replace  your 
global  library  set. 
directive  meaning 


A  add 

D  delete 

R  replace 

(default:  R) 

Omit  all  parameters  to  clear  your  global  library 

set. 

Remarks:  The  order  of  search  for  externals  is: 

global  (those  on  most  recent  LIBRARY) 
local  (those  in  LDSET,LIB~  or  in  LDSET  tables 
in  the  loaded  modules) 
system  (SYSLIB) 
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The  order  of  search  for  programs  is: 

local  files;  global,  local  and  system  (NUCLEUS) 
libraries 

LIBRARY  may  not  occur  in  a  load  sequence. 

A  no~auto-drop  status  is  set  for  these  files 
while  they  are  in  the  global  set.  See  SETPS. 

Similar  commands:  Cray,  NOS/BE:  LIBRARY 

VMS:  LINK  . . . , library/LIB 

Examples:  LIBRARY, MYLIB.  <—  global  set  has  MYLIB 

LIBRARY, YOURLIB/A.  <—  global  set  has  MYLIB 

and  YOURLIB 

LIBRARY.  < —  global  set  empty 


LIMITS  List  your  validation  limits. 
Syntax:  LIMITS, L*lfn. 

Similar  commands:  NOS/BE:  ASSETS 
Examples:  LIMITS. 


LINE  (IAF)  Set  your  terminal  for  line  mode. 

Syntax:  LINE. 

LINE , TM-mode 1 . 

LINE, model. 

Parameters:  See  SCREEN. 

Remarks:  LINE  may  be  included  in  a  procedure. 

LINE  is  the  default  setting  unless  SCREEN  is 
included  in  your  LOGINPR  file. 

Affects  FSE,  HELPME,  screen  formatting,  and  the 
display  of  NOS  procedure  parameters. 

See  also:  SCREEN 


Examples 


LINE. 
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LIST  (IAF)  List  lines  of  a  local  file. 

Syntax:  LIST,F“lfn 

Parameters:  F-  -  the  local  file  to  be  listed 

(default:  the  primary  file) 

Similar  commands:  NOS/BE:  COPYSBF,  COPYSF,  COPYSR,  LISTN,;  TYPE- 

LISTZ  (last  4  DTRC) 

VMS:  VSYS: LISTN  (DTRC) 

Examples:  LIST.F-MYFILE 

A--  list  local  file  MYFILE 


LISTLB  List  labels  of  an  ANSI-labelled  tape. 

Syntax:  LISTLB , lfn, Si-set id, QN-seqno , LO*l type , L*out . 

Parameters:  SI**  -  1-  to  6-character  file  set  identifier 

QN”  -  1-  to  4-character  file  sequence  identifier 

LO-  -  label  type(s)  to  be  listed 
A  -  all  labels 
R  -  required  labels 
0  -  optional  labels 
V  -  VOLn  labels 
H  -  HDRn  labels 
F  -  EOFn  labels 
E  -  EOVn  labels 
U  -  uvln,  uhln,  utln  labels 
(default:  A) 

Similar  commands:  NOS/BE:  LISTMF 

Examples:  LABEL , tape .... . 

LISTLB, tape. 
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LISTLID 


LOAD 


LOCK 


Liat  network  conf iguration  and  hoat  availability  information. 

Syntax:  LISTLID, LID-1 id, PID-pid,L-lfn. 

LISTLID, ST-lid,PID-pid,L-lfn. 

Parameter*:  LID-  -  a  apecific  logical  identifier 
ST- 

PID-  -  a  apecific  phyaical  identifier 

Siaiilar  command*:  NOS/BE:  Q,ID 

VMS:  SHOW  NETWORK 

Example*:  LISTLID. 


(Loader)  Liat  of  object  filea  whoae  contenta  are  to  be  loaded. 
Syntax:  LOAD, lfnl, lfn2, ...» lfnn. 

Parameter*:  Ifni  -  rewind  (except  INPUT)  before  loading 
lfni/R  -  rewind  before  loading 
lfni/NR  -  do  not  rewind  before  loading 

See  alao:  LIBLOAD,  SLOAD 

Siaiilar  coaaaanda:  Cray:  SEGLDR  BIN-dnl ,dn2, . . . 

NOS/BE:  LOAD 

VMS:  LINK  fl,f2,... 

Examp lea:  LOAD, LGO, BIN. 


Prevent  writing  on  a  file. 

Syntax:  LOCK, lfnl, lfn2, ..., lfnn. 

Parameter*:  Ifni  -  a  local  file 

Remark*:  Uaed  to  prevent  writing  on  a  local  file. 

See  alao:  UNLOCK 

Similar  command*:  Cray: 

NOS/BE :  ATTACH , . . . , MR- 1 
VMS:  OPEN (....READONLY)  in  Fortran 

program 
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Examples:  ...  < —  create  a  new  file 

LOCK,newf ile. 

A —  inhibit  further  writing  on  file 
NEWFILE 

. . .  < —  other  command* 

UNLOCK, newfile. 

A—  all  writing  on  file  NEWFILE 


LOGIN  (IAF)  Terminate  your  current  application  and  start  another. 
Syntax:  LOGIN, application 

Remarks:  LOGIN  may  be  used  in  a  procedure  or  batch  job, 

where  it  terminates  the  job. 

See  also:  HELLO;  LOGOUT,  BYE,  GOODBYE 

Similar  commands:  NOS/BE:  LOGIN  (not  in  a  procedure  or 

batch  job) 

Examples:  LOGIN, ICF  <—  switch  to  ICF 


LOGOUT  (IAF)  Terminate  an  application. 

Syntax:  LOGOUT, application 

Remarks:  LOGOUT  may  be  used  in  a  procedure  or  batch  job, 

where  it  terminates  the  job. 

See  also:  BYE,  GOODBYE;  LOGIN,  HELLO 

Similar  commands:  Cray:  AZ,QUIT 

NOS/BE:  LOGOUT  (not  in  a  procedure  or 
batch  job) 

VMS:  LOGOUT 

Examp 1 es :  LOGOUT 


L072  Reformat  files. 

Syntax:  L072,pl,p2, . . . ,pn. 

Parameters:  I*l£n  -  file  with  reformat  parameters 

I  -  same  as  I- INPUT 

1-0  -  no  file  of  reformat  parameters 

omitted  -  same  as  I"0 
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Reaarks: 


S“l£n  -  input  file  to  be  reformatted 
S  -  ease  as  S“SCR 

omitted  -  same  as  S*SCR 

L-lfn  -  output  reformatted  file 
L  -  same  as  L-OUTPUT 

omitted  -  same  as  L«0UTPUT 

T-x  -  type  of  file  being  reformatted 
x  meaning 


M  Modify  source  data 
C  COMPASS  source  data 
B  other  source  data 

T  -  same  as  T“B 

omitted  -  same  as  T-B 

H-xxx  -  (truncation)  length  of  output  line 

H  -  same  as  H-72 

omitted  -  same  as  H*72 

(max:  150;  must  be  >“  Nx+Ox) 

(see  Remarks  below) 

LP  -  format  for  line  printer 

NR  -  do  not  rewind  S  file 

Nx-y  -  number  of  characters  to  be  moved 

x  -  field  number  (1-6) 
y  -  number  of  characters  being  moved 
(see  Remarks  below) 

Ix*y  -  input  data  field 

x  -  field  number  (1-6) 
y  -  starting  column 
(see  Remarks  below) 

Ox-y  -  output  data  field 

x  -  field  number  (1-6) 
y  -  starting  column 
(see  Remarks  below) 

IT  -  suppress  query  before  each  change 

omitted  -  query  before  each  change 
(interactive  jobs  only) 

Restrictions  on  H,  N,  I,  0: 

(Nx+Ix)>150  — >  error  for  l<-x<-6 
(Nx+Ox)  >H  —>  error  for  l<-x<-6 
H  >150  — >  error 
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Defaults  for 

N, 

0, 

I: 

type 

N1 

11 

01 

N2 

12 

02 

N3 

13 

03 

B 

72 

1 

1 

0 

0 

0 

0 

0 

0 

C 

7 

9 

1 

50 

41 

8 

15 

112 

58 

M 

2 

6 

1 

48 

10 

3 

22 

82 

51 

Ni,Ii 

o 

1 

o 

for 

4<* 

■i<-6. 

Host  useful  in  compressing  compiler  list  output 
to  fit  into  72  columns 

Similar  commands:  NOS/BE:  COPYEXT;  COPYS  (both  DTRC) 

VMS:  VSYS:CPYEXT  (DTRC) 

Examples :  L072 , S-ny in , L-nyout ,11-2,01-1. 

A —  restore  a  file  that  was  shifted 
one  column  to  the  right,  perhaps 
by  COPYSBF 


HAP 


(Loader)  Specify  the  global  default  option  for  load  maps. 

Syntax:  HAP. 

MAP.p. 

Parameters:  p  -  the  desired  load  map 

p  meaning 

OFF  no  map 

(same  as  LDSET,MAP-N) 

PART  statistics  and  block  map 

(same  as  LDSET,MAP-SB) 

ON  PART  plus  entry  point  cross- 

reference 

(same  as  LDSET , MAP-SBX) 

FULL  ON  plus  entry  point  map 

(same  as  LDSET , HAP-SBEX) 

(default  at  DTRC:  OFF) 


ReMrks:  MAP  without  a  parameter  resets  to  the  default. 

HAP  remains  in  offset  until  changed  by  another 
HAP  statement.  It  may  be  overridden  for  the 
next  load  by  using  LDSET, MAP-. 

The  more  map  requested,  the  more  CP  tine  and 
memory  is  required  to  generate  it. 

See  also:  LDSET 
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Siailar  coaaands: 


Cray:  SEGLDR 

NOS/BE:  MAP 

VMS:  LINK  qualifiers 


Exaaples:  MAP (PART) 


MERGE  Marge  files. 

Syntax:  FILE, lfninl, . . . . 

FILE, lfnin2 . 

«  e  • 

FILE, lfnout, .... 

MERGE. pi, p2, . .. ,pn 
or 

MERGE .pi  p2  ...  pn 

Positional:  MERGE. f roa, to, key, dir,l, ,e,el, 

dialog, end, , , ownt , ownf 1 , 
ownarl , , ownl . own2 , own 3 , 
own4, own5, retain, seqa.seqn, 
seqr.seqs, status, sua, , 
verify, fastio. 

Interactivei  MERGE. DIALOG- YES 

Directive  file:  MERGE. DIR-lfn 

MERGE . paraas , DIR- 1 f n 
MERGE . DIR- 1 f n , paraas 
MERGE . paraas , DIR- 1 f n , . . 
.aore_paraas 

Paraaeters:  See  SORT5 . 

VERIFY  -  Verify  that  each  input  file  is  sorted 
before  aerging  them. 

Reaarks:  Files  to  be  aerged  aust  be  presorted. 

See  SORT5  reaarks. 


See  also:  SORT5 


Siailar  coaaands:  Cray,  VMS:  SORT 
NOS/BE:  MERGE 

Exaap les:  FILE, ini, BT-C , RT-Z , MRL-80 . 

FILE , in2 , BT-C , RT-Z , MRL-80 . 

FILE , out f yl , BT-C , RT-Z , MRL-640 . 
MERGE. (ini , in2) , outfyl 

* —  aerge  two  files 
MERGE. FROM- (ini , in2) , TO-outfyl 
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MFL 


MODE 


MODIFY 


name 


Reset  maximum  field  length  for  subsequent  job  steps. 

Syntax:  MFL , CM“nnnnnn . 

MFL.nnnnnn. 

Remarks:  MFL  clears  RFL  and  allows  the  system  to  determine 

the  FL  for  each  job  step. 

MFL  cannot  exceed  the  job  statement  CM  or  376500 
octal,  whichever  is  lower. 

See  also:  RFL. 

Similar  commands:  NOS/BE:  EFL;  RFL 
Examples:  MFL, 200000. 

Mode  error  bypass  should  not  be  used  at  DTRC.  An  attempt  to 
ignore  Error  Mode  1  may  cause  an  Error  Mode  0. 

Edit  a  Modify-f ormatted  program  library. 

Remarks:  Use  UPDATE. 


(Loader)  Load  and  execute  binary  program  or  procedure  in  local 
file  "name". 

Syntax:  name. 

name,plist. 

Parameters:  plist  -  list  of  positional  and/or  keyword 

parameters  for  the  program  or  procedure 
being  executed 

See  also:  BEGIN,  LGO 

Similar  commands:  Cray:  name 

NOS/BE:  name 
VMS:  RUN 

Examples:  ATTACH,myprog. 

myprog. 
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NOEXIT 


NOGO 


NORERUN 


Continue  processing  with  the  next  coaaand  even  if  an  error  has 
occurred  (suppress  EXIT  processing). 


Syntax:  NOEXIT. 

See  also:  EXIT,  ONEXIT 

Siailar  commands:  NOS/BE:  EXIT.U 

VMS:  ON  condition 


Examples:  NOEXIT. 

FTN5. 

ONEXIT. 

LGO. 


< —  Exit  processing  off 

< —  restore  exit  processing 
< —  executed  even  if  compile  errors 
< —  not  executed  if  execution  errors 


(Loader)  Coaplete  loading  of  a  program,  generate  load  map  (if 
requested),  put  absolute  into  a  file  (if  requested),  but  do 
not  execute. 


Syntax:  NOGO. 

NOGO.abs. 


Parameters:  abs  -  will  contain  the  loaded  prograa  as  a  single 
core  image  aodule  (non-segaent ed/non¬ 
overlay  loads  only) 

(<abs>  is  suitable  for  inclusion  in  a 
LIBEDIT  library) 

See  also:  LDSET 

Siailar  coaaands:  Cray:  SEGLDR  (ABS-  directive) 

NOS/BE:  NOGO 
VMS:  LINK 


Examples:  DEFINE, ayprog/NA. 

LOAD,  LGO. 

NOGO , ayprog . 


Clear  the  job  rerun  status. 

Syntax:  NORERUN. 

Reaarks:  May  be  useful  to  prevent  updating  a  file  when  the 

job  would  ordinarily  be  rerun. 


See  also:  RERUN 
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Siailar  coaaands:  Cray:  RERUN 

NOS/BE:  NORERUN 

Exaapl es :  NORERUN . 


NORMAL  (IAF)  Reverse  the  effect  of  ASCII,  AUTO,  BRIEF,  CSET, ASCII, 
and  NOSORT  coaaands. 

Syntax:  NORMAL 


See  also:  ASCII,  AUTO, BRIEF,  CSET,  NOSORT 

Exaapl es:  NORMAL 


NOTE  Create  a  file  with  the  coaaand  line  containing  the  lines  for 

the  new  file. 

Syntax:  NOTE, lfn,NR./line_l/line_2/. . ./line_n 

Paraaeters:  lfn  -  (default:  OUTPUT) 

NR  -  Do  not  rewind  lfn  before  and  after 
(default:  rewind) 

/  -  a  deliaiter  (any  character)  denoting  the 

start  of  a  new  line  for  the  file 
(the  character  iamediately  following  the 
terainator  is  the  deliaiter) 

line_i  -  the  contents  of  the  i-th  line  of  the 
new  file 

Reaarks:  The  NOS/BE  default  is  NO  rewind. 

Siailar  coaaands:  Cray:  NOTE 

NOS/BE:  NOTE  (DTRC) 

VMS:  OPEN, WRITE, CLOSE 

Exaapl es:  NOTE, DATA./  1  2. A/LINE  OF  TEXT/0.1  1E-4/END 

* —  create  a  new  file  DATA 

Local  file  DATA  contains: 

1  2. A 

LINE  OF  TEXT 

0.1  1E-A 

END 
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NOTE, DATA, NR./  1  2. A/LINE  OF  TEXT/0.1  1E-4/END 

NOTE, DATA, NR./  2  3.6/ANOTHER  LINE  OF  TEXT 
NOTE,DATA,NR./O.l  1E-4/END 

A —  create  File  with  many  lines 
PACK, DATA.  < —  remove  embedded  EORa 

Local  File  DATA  contains: 

1  2.4 

LINE  OF  TEXT 
0.1  IE-4 
END 

2  3.6 

ANOTHER  LINE  OF  TEXT 

0.1  IE-4 

END 


NOTE.UIN. /^compile  progl , subl , sub2 
UPDATE, I-UIN. 


NOTE. /THE  PROGRAM  FINISHED 

A —  useful  For  displaying  messages 
(comments)  From  a  procedure 


NULL 


(IAF)  Select  the  NULL  subsystem. 

Syntax:  NULL 

Remarks:  This  is  the  deFault  subsystem  in  a  batch  job. 

RUN  will  not  work  in  the  NULL  subsystem. 
Examples:  NULL 


OFFSH  Clear  sense  switches. 

Syntax:  OFFSW,switch_l,awitch_2, . . . ,switch_n, jsn. 

Parameters:  switch_i  -  a  sense  switch  to  be  cleared  (1-6) 

0  -  clear  all  sens*  switches 

jsn  -  since  a  jsn  is  recognized  by  its 

alphabetic  characters,  jsn  may  appear 
anywhere  in  the  parameters  list 

See  also:  ONSW 

Similar  commands:  Cray,  NOS/BE:  SWITCH 
Examples:  OFFSW.O.ABCD. 

A —  clear  all  sens*  switches  For  job 

ABCD 
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ONEX IT 


ONSW 


OPLEDIT 


OUT 


Reverse  the  effect  of  NOEXIT. 

Syntax:  ONEXIT. 

See  alao:  EXIT,  NOEXIT 

Siaiilar  cosaunds:  VMS:  NOON;  ON  condition  THEN  CONTINUE 

Exaaples:  See  NOEXIT. 

Set  sense  switches. 

Syntax:  ONSW,switch_l,switch_2, . . . , awitch_n, jsn. 

Paraaeters:  switch_i  -  a  sense  switch  to  be  set  (1-6) 

0  -  sat  all  sense  switches 

jsn  -  since  a  jsn  is  recognized  by  its 

alphabetic  characters,  jsn  aay  appear 
anywhere  in  the  paraaeters  list 

See  also:  OFFSW,  SWITCH 

Siailar  coaaands:  Cray,  NOS/BE:  SWITCH 

Exaaples:  0NSW,ABCD,4,5. 

A —  turn  sense  switches  4  and  5  on 

in  job  ABCD 

Reaove  Modification  decks  and  identifiers  froa  a  MODIFY 
library. 

Reaarks :  Use  UPDATE  instead  of  MODIFY. 


Send  deferred  output  files  to  the  print  or  punch  queue 
iaaediately. 

Syntax:  OUT.  < —  queue  all  files 

OUT,*, lfnl , lfn2, ..., lfnn.  < —  queue  all  files, 

except  those  listed 


Paraaeters: 

Reaarks:  OUT  processes  any  file  given  deferred  ROUTE-ing 

as  well  as  OUTPUT,  PUNCH,  PUNCHB,  P8. 


See  also 


ROUTE 
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Similar  commands: 

Examples:  OUT. 


Cray:  DISPOSE 

NOS/BE:  ROUTE 


OVWRITE  Overwrite  Piles  to  erase  (destroy)  their  contents. 

Syntax :  OVWRITE ,  1 fnl , 1 f n2 , . . . ,  1 f nn/0P«plp2 . 

* —  overwrite  specified  files 

OVWRITE,*, lfnl ,lfn2 . lfnn/OP«plp2. 

A —  overwrite  all  but  specified 
files 

Parameters:  OP-  -  how  files  are  to  be  overwritten  and 
whether  they  are  to  be  released 
pi  meaning 


Z  overwrite  with  zeros 

X  overwrite  with  zeros,  then  ones, 

then  alternating  zeros  and  ones 
R  release  files  after  overwriting 
(default:  OP-Z) 

Similar  commands:  Cray:  SCRUBDS;  WRITEDS 

Examples:  OVWRITE, fyll,0P*XR. 

A —  clear  a  file,  then  release  it 


PACK  Combine  all  records/files  in  a  file  by  removing  all  EORs  and 
EOFs. 

Syntax:  PACK,lfn_in,lfn_out,x. 

Parameters:  lfn_in  -  (not  rewound  after) 

l£n_out  -  (default:  lfnout*lfnin; 

rewound  after,  but  not  before) 

x  -  non-null  to  not  rewind  lfn_in  before 

packing 

Remarks:  Do  not  use  with  S,  L,  or  F  tapes 

Similar  commands:  NOS/BE:  COMBINE 


Examples 


PACK, infyl ,pkdf yl 


88/10/01 


RevO 


Page  D-81 


PASS WO R  Change  your  password. 

Syntax:  PASSWOR, oldpw.newpw. 

PASSWOR. 

Parameters:  oldpw  -  old  password 

newpw  -  new  password  (4-7  characters) 

Remarks:  Must  be  set  separately  for  batch  and  interactive. 


Similar  commands :  Cray:  ACCOUNT, NUPW*nupw, . . . ; 

NEWCRAYPW  (from  VMS) 
NOS/BE:  interactive:  TURNKEY 
batch:  none 

VMS:  SET  PASSWORD 

Examples:  PASSWOR, old, new. 


PAUSE  Set  the  pause  bit  of  one  of  your  executing  jobs. 
Syntax:  PAUSE, jsn. 

See  also:  GO 

Examples:  PAUSE, ABCD. 


PERMIT  Explicitly  permit  another  user  to  access  one  of  your  private 
or  semi-private  files. 

Syntax :  PERMIT , pf n , un_l"m_l , un_2*m_2 , . . . , un_n“m_n/NA. 

Similar  commands:  Cray:  permit  lists 

VMS:  Access  Control  Lists 

Examples:  PERMIT, myfile,ABCD-R. 

A —  allow  ABCD  to  read  the  file 


PUR GALL  Purge  all  your  files  which  match  the  parameters. 

Syntax :  PURGALL , TY-ty , CT-c  t , AD-ad , MD-md , CD-cd , AF , TM- tm , NA. 

Parameters:  ty  -  file  type 

ty  meaning 


I  (INDIR)  all  indirect  files 

D  (DIRECT)  all  direct  files 

A  (ALL)  all  files 

(Default:  TY*A,  if  any  other  parameter  is 

specified) 
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ad  -  all  files  last  accessed  before  (after,  if  AF) 
this  date  (yymmdd) 

ad  -  all  files  last  modified  before  (after,  if  AF) 
this  date  (yymadd) 

cd  -  all  files  created  before  (after,  if  AF) 
this  date  (yyaadd) 

AF  -  all  files  after  AD,  MD,  or  CD  dates 

ta  -  tiae-of-day  on  the  AD,  MD,  CD  date  (hhaass) 

Remarks:  AF,  CT,  DN,  MA,  TY,  TM,  and  one  date  (either  AC, 

HD,  CD)  fit  on  a  single  PUR GALL  coaaand. 

Similar  commands:  VMS:  DELETE;  PURGE 

Examples:  PUR GALL, AD-860620. 

A —  purge  all  (your)  files  not 
accessed  in  2  or  more  years 
(assuming  today  is  June  20, 

1988) 


PURGE  Purge  one  or  more  direct  or  indirect  permanent  files. 

Syntax:  PURGE, pfn_l,pfn_2, . . . ,pfn_n/UN-un,PW-pw,NA. 

Remarks:  If  the  file  is  attached,  it  remains  as  a  local 

file  until  RETURNed  or  LOGOUT. 

Similar  commands:  Cray:  DELETE 

NOS/BE:  BEGIN, PAC;  BEGIN, PAHC;  BEGIN, PALC; 
BEGIN, PHC;  BEGIN, PLC  (all  DTRC) ; 
PURGE 

VMS:  DELETE;  PURGE 

Examples:  PURGE, my obj/NA.  < —  be  sure  file  is  not  present 

DEFINE, ^obj.  < —  before  creating  a  new  one 

(this  is  the  equivalent  of 

MSSTORE . NA-1  under 

NOS/BE) 
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RECLAIM  Selectively  backup  and  reload  local  and  permanent  files. 

Syntax:  RECLAIM.pl, p2, . . . ,pn./dirl , optsl/dir2, opt«2/. . . 

Parameters:  pi  -  parameter 

diri  -  directive 

opti  -  option 

Remarks:  No  REQUEST  is  needed  for  a  magnetic  tape. 

Dump  tapes  MUST  be  labelled. 

RECLAIM  tapes  are  compatible  with  PFDUMP  and 
PFLOAD. 

See  also:  See  NOS  2  Reference  Set  Volume  3:  System  Commands 

for  a  15-page  discussion  of  the  RECLAIM  utility. 

Similar  commands:  NOS/BE:  DUMPF;  PFLOAD;  BEGIN , SELDUMP ; 

BEGIN, SELLOAD  (last  two  DTRC) 

VMS:  BACKUP 
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RECOVER 


REDO 


(IAF)  Recover  a  detached  job  or  interrupted  terminal  session. 
Syntax:  RECOVER, JSN-jen,0P«T 

RECOVER, jsn.T 
RECOVER 

Paraaeters:  jsn  -  job  sequence  number  of  the  detached  job 

T  -  abort  recovery  if  no  recoverable  files 
(else  start  a  recovery  dialog) 

Examples:  /RECOVER , ABCD 


(IAF)  Recall  a  previously  entered  command  to  modify  and 
re-execute  it  without  having  to  retype  the  entire  command. 


Syntax:  REDO, string/GO 

R, string/GO 


Parameters:  string  -  the  first  up-to-10  characters  or  the 

command  to  be  REDOne  (a  blank  or 
terminator  in  string  ends  the  command) 
(default:  the  most  recent  command) 


GO  -  re-execute  without  modification 

(OLD:,  MOD:,  NEW:  prompts  are  suppressed) 


Edit  chars: 


space  -  leave  character  unchanged 
#  -  delete  character  any  shift  line  to  left 

&  -  replace  character  with  a  space 

'  -  insert  characters  before  the  marked 

character  (end  the  inserted  string  with  a 
#;  A  RETURN  displays  the  command  line  as 
edited  so  far) 

1  -  delete  to  the  end  of  the  line 

other  -  replaces  the  original  character 


Similar  commands:  VMS,  VMS  Cray  Station:  <UP  arrow> 


Examples:  /REDO 

OLD:  CATLIST, L0*F, FN*ABCDEFG 
MOD:  hi j  t 

NEW:  CATLIST , L0*F , FN*HI J 


/REDO 

OLD:  CATLIST, LO-X , FN-ABCDEFG 
MOD:  f  hij!A 

NEW:  CATLIST, LO-F.FN-HIJ  <--  changes  so  far 

MOD:  AP 

NEW:  CATLIST , LO-FP , FN-HIJ 
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REDUCE  (Loader)  Turn  the  reduce  flag  on  or  off. 

Syntax:  REDUCE.  < —  turn  reduce  flag  on 

REDUCE (-)  < —  turn  reduce  flag  off 

Reaarka:  When  on,  the  loader  determines  the  field  length 

assigned. 

When  off,  you  determine  the  field  length  with 
RFL  statements. 

See  also:  RFL 

Similar  commands:  NOS/BE:  RFL 

Examples:  FTN5 . 

LGO.  < —  program  executes  in  the  FL  needed 

RFL, 50000. 

REDUCE (-) 

LGO.  < —  program  executes  in  50000  words 

REDUCE.  < —  next  load  executes  in  what  is 

needed 


RENAME  Change  the  name  of  a  local  file. 

Syntax:  RENAME, nfnl»ofnl,nfn2<*ofn2, . . . ,nfnn-ofnn. 

Parameters:  nfni  -  the  new  name 

ofni  -  the  existing  name 

Reswrks:  Does  not  change  the  name  in  the  permanent  file 

directory. 

Similar  comaiands:  NOS/BE:  BATCH, If no, RENAME, If nn 
VMS:  no  local  file  concept 

Examples:  RENAME, that~this. 

A —  change  local  file  name  THIS  to 
THAT 


REPLACE  Purge  an  indirect  file  and  replace  it  with  a  copy  of  a  local 
file;  save  a  copy  of  a  local  file  as  a  new  indirect  file. 

REPLACE, lfn  l*pfn  1, lfn_2*pfn_2, . . . , lfn  n«pfn  n/ 
UN-un , PW-p w , M-m , NA . 


Syntax 
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Reaarks:  If  the  file  already  exists,  the  catalog  type 

(CT“)  and  all  other  inforaation  about  the  file  is 
preserved;  if  it  does  not,  a  new  file  is  created 
with  CT-PRIVATE. 


See  also:  SAVE 

Exaaples:  REPLACE, aylfn«ayprog 

A —  replaces  indirect  file  MYPROG 
with  the  contents  of  local  file 
MYLFN 


REQUEST  Request  a  tape  be  aounted. 
Reaarks:  Use  LABEL. 


REQUEST  Assign  a  file  to  receive  checkpoint  dumps,  or  send  a  message 
to  the  operator  to  assign  to  the  described  device. 

Syntax:  REQUEST, lfn, ckpt . cosaent 

Parameters:  ckpt  -  lfn  is  to  be  a  checkpoint  file 

ckpt  meaning 


CK  put  each  dump  at  end  of  lfn 

CB  put  each  dump  at  beginning  of  lfn 

comment  -  aessage  to  the  operator  about  device 

assignaent 

Siailar  command*:  NOS/BE:  LABEL, ... ,X"CK. 

Exaaples:  REQUEST, lfn, CK. 

A —  save  all  checkpoints 

REQUEST, If n.CB. 

A —  save  the  last  checkpoint 

REQUEST, lfnl.CB. 

REQUEST, If n2,CB. 

A —  save  consecutive  checkpoints  by 
alternating  two  checkpoint 
files. 

DEFINE, lfn. 

REQUEST, If n,CK.  -or-  ASSIGN 
CKP. 

A —  make  checkpoint  file  peraanent 
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RERUN  Allow  a  job  to  be  rerun  if  necessary. 

Syntax:  RERUN. 

Remarks:  A  job  is  normally  rerunable  unless  it  does 

something  which  might  tw  He  a  rerun  fail,  such  as 
creating,  modifying  or  ueleting  a  file,  etc. 

See  also:  NORERUN 

Similar  commands:  Cray:  RERUN 

Examples:  RERUN. 


RESOURC  Specify  that  more  than  one  tape  drive  is  required. 


Syntax:  RESOURC, rtl“ul,rt2-u2, . . . ,rtn~un 


Parameters:  rti 


resource  type 
LO  -  7-traek 
HI  -  7-track 
HY  -  7-track 
HD  -  9-track 
PE  -  9-track 
GE  -  9-track 


tape,  200  cpi 
tape,  556  cpi 
tape,  800  cpi 
tape,  800  cpi 
tape,  1600  cpi 
tape,  6250  cpi 


ui  -  maximum  number  of  units  this  job  will 
use  concurrently 

0  -  clear  a  resource  type  that  is  no 
longer  required 


Remarks:  Jobs  needing  only  a  single  tape  drive  at  a  time, 

even  for  a  multi-reel  file,  do  »  at  need  a  RESOURC 

statement. 


RESOURC  should  precede  the  first  tape  request. 
Subsequent  RESOURC  statements  may  change  any 
rt-u. 


This  statement  helps  prevent  deadlock. 


Similar  commands:  NOS/BE: 

VMS: 


job  statement  parameter 
ALLOCATE 


Examples:  RESOURC, GE-2.  < —  two  6250  cpi,  9-track  tapes 

are  required  at  once 

J0B123. 

USER, .... 

CHARGE . 

RESOURC , PE-2 .  < —  2  1600-cpi  tapes  needed 

LABEL, Tl, D-PE, VSN-tapel. 

LABEL , T2 , D-PE , VSN- t ape2 . 
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RETURN, T1,T2. 

RESOUR C ,  PE“  1 ,  GE“  1 .  <—  1  1600  and  1  6250 


RESTART  Restart  a  checkpointed  job. 

Syntax:  RESTART, lfn,nnnn,x_i. 

Parameters:  l£n  -  the  checkpoint  file 

(must  have  write  permission) 

nnnn  -  number  of  the  checkpoint 

(Default:  1;  use  *  for  last  checkpoint) 

x_i  -  RI  -  do  not  restore  command  file  on  lfn 
NA  -  do  not  abort  if  a  required  file  is 
not  available;  if  read  parity  while 
restoring  a  file  in  checkpoint  nnnn, 
use  checkpoint  nnnn-1 

FC  -  do  not  restore  files  ZZZZZC0 ,  Cl,  C2, 
if  already  local 

Similar  commands:  NOS/BE:  RESTART 

Examples:  RESTART, ckpfyl ,  *. 


RETURN  Release  files  (and  file  space  depending  on  file  type)  assigned 
to  a  job. 

Syntax:  RETURN, lfnl, lfn2, ..., lfnn.  < —  all  listed 

files 

RETURN,*, lfnl, lfn2 . lfnn.  <~  all  but  listed 

files 

Parameters:  Ifni  -  a  file  assigned  to  your  job 

See  also:  CLEAR,  EVICT,  UNLOAD 

Similar  commands:  Cray:  RELEASE 

NOS/BE:  CLEAR;  RETURN;  RETAIN 
VMS:  CLOSE  it  in  a  program 

Examples:  RETURN, dt lib, sublib.workl, out. 
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REVERT  Return  from  a  procedure. 

Syntax:  REVERT, opt. com 

Parameter*:  opt  -  revert  option 

opt  meaning 


ABORT  return  to  next'  EXIT,  unless  NOEXIT 
(REVERT  appears  at  your  terminal 
and  in  the  job  dayfile) 

EX  return  to  calling  procedure  and 

execute  command  <com> 

(REVERT  appears  in  the  job  dayfile 
but  not  at  your  terminal) 

NOLIST  return  to  calling  procedure 

(REVERT  does  not  appear  at  your 
terminal  or  in  the  job  dayfile) 

com  -  for  opt  EX:  the  command  to  be  executed 

for  other  opt:  a  comment 

Remarks:  The  following  statements  are  supplied 

automatically  at  the  end  of  a  procedure  to  insure 
that  a  REVERT  is  present: 

SREVERT.CCL 
SEXIT.CCL 
SREVERT, ABORT. CCL 

Similar  commands:  Cray:  RETURN 

NOS/BE:  REVERT 
VMS:  EXIT 

Examples:  .PR0C,MYPR0C. 

. *  the  body  of  your  procedure 
REVERT, NOLIST. 

EXIT. 

DMP, 30000. 

REVERT, ABORT. 


REWIND  Position  files  at  beginning-of-information  (BOI) . 

Syntax:  REWIND, lfnl , lfn2, ..., lfnn.  < —  all  listed 

files 

REWIND,*, lfnl , lfn2, ..., lfnn.  <- -  all  but  listed 

files 

Parameters:  Ifni  -  a  file  assigned  to  your  job 


Similar  commands:  Cray,  NOS/BE:  REWIND 
Examples:  REWIND.myfile. 


Page  D-90 


RevO 


88/10/01 


RFL 


ROUTE 


Set  field  length  for  the  next  program  execution. 

Syntax:  RFL,CM*nnnnnn. 

RFL.nnnnnn. 

Reaarkc:  nnnnnn  aay  not  exceed  the  last  MFL  or  job 

stateaent  setting. 

See  also:  MFL,  REDUCE 

Siailar  coaaands:  NOS/BE:  EFL,  RFL 

Exaaples:  FTN5. 

LGO. 

RFL, 50000. 

REDUCE (-) 

LGO. 

REDUCE. 


Direct  the  disposition  of  an  indirect  file  and  define  its 
characteristics. 


Syntax:  ROUTE, If n, par aaeters . 


Paraaeters:  DC~dc 


DC 


-  disposition  code 
IK  "  input  queue 
LP  -  any  printer 
PL  -  plot 
PR  -  saae  as  LP 
PU  -  punch  coded 
P8  "  punch  80-column  binary 
SB  ~  punch  system  binary 
SC  -  rescind  prior  routine  and  aake 
the  file  type  local 
TO  -  input  queue  (output  to  wait 
queue) 

(default:  saae  as  in  previous  ROUTE 

for  this  Ifn;  if  none,  DC“SC, 
except  these  special  naaes: 


naae 

DC 

OUTPUT 

PR 

PUNCH 

PU 

PUNCHB 

SB 

P8 

P8  ) 

SC 

DBF  -  defer  routing  until  end-of-job 
(default:  do  it  now; 
not  allowed  with  DC-IN,  NO,  TO) 
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RTIME 


EOec  -  external  characteristics  for  print 
and  punch  files 
print: 

ec  Meaning 


A6  ASCII  graphic  63/64-char  set 

A9  ASCII  graphic  95-char  set 

(lfn  must  be  7-bit  ASCII8) 

FC“fc  -  fora*  code 

FC  -  use  standard  print  or  card  forms 

FID-ujn  -  NOS/BE  compatibility  (sane  as  UJN-) 

REP-rep  -  number  of  extra  copies 

(default:  0  (only  1  copy  printed); 
maximum:  31  (37B)) 

TID-  -  see  UN 

UJN-ujn  -  user  job  name  for  the  file  (not  input) 

UN-un  -  user  name  of  the  receiving  remote  batch 

or  interactive  user 
UN  -  implicit  remote  routing 

Remarks :  In  general,  if  a  parameter  is  omitted,  it 

retains  the  definition  from  the  last  ROUTE 
command  which  referenced  that  "lfn".  The 
exception  is  DEF. 

Similar  commands:  Cray:  DISPOSE 

NOS/BE:  ROUTE 

VMS:  SUBMIT;  PRINT;  XEROX  (DTRC) ; 

FICHE  (DTRC) 

Examples:  CATLIST,LO-F,L-outl. 

ROUTE , out 1 , DC" PR .  < —  print  at  Central  Site 

-or- 

ROUTE , out 1 , DC-PR , UN-AN AP . 

* —  print  at  Annapolis 


ROUTE, mydata , DC-PU , FC-NP ,U JN-xxxxx . 

A —  punch  deck  with  banner 
card  of  "xxxxx" 


Put  the  real-time  clock  time  into  the  dayfile. 
Syntax:  RTIME. 


See  also 


CTIME,  STIME 
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Siailar  coaaands:  Cray: 

NOS/BE:  DFDATIM;  PTIM  (both  DTRC) 

VMS:  AT 

Exaaples:  RTIME. 

SATISFY  (Loader)  Satisfy  unsatisfied  externals  now,  instead  of  at  the 
end  of  the  loading. 

Syntax:  SATISFY. 

SATISFY, libl,lib2,...,libn. 

Paraaeters:  libi  -  a  specific  library  to  be  searched  in  the 

listed  order 

(default:  all  known  libraries  are  searched) 

Siailar  coaaands:  NOS/BE:  SATISFY 

Exaaples:  LOAD.binl. 

SATISFY (ay lib) 

LOAD,bin2. 

SATISFY. 

bin3. 


SAVE  Put  a  copy  of  a  local  file  on  disk  as  an  indirect  file. 

Syntax:  SAVE, lfn_l-pfn_l , lfn_2“pfn_2, . . . , lfn_n-pfn_n 

/PW«pw, CT«ct ,M“a, SS-ss , BR-br , PR-pr ,NA, AC-ac . 

See  also:  REPLACE 

Exaap 1 es :  SAVE , ay t  eap-k  eep it/ CT-PU . 

A—  save  local  file  MYTEMP  as  a 
public  file  unless  KEEPIT 
already  exists 


SCOPY  Copy  coded  file(s)  displaying  EORs  and  EOFs  in  the  receiving 
file. 

Syntax :  SCOPY , 1 fn_in , 1 f n_out , n , f char , 1 char , na , R , f cs , 

f line, lline, ns. 

Paraaeters:  n  -  decimal  number  of  files  to  copy 

(default:  copy  to  EOI) 

fchar  -  first  character  position  of  line  to  copy 
lchar  -  last  character  position  of  line  to  copy 
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na  -  do  not  abort  if  no  line  terminator 
before  EOR 

R  -  rewind  lfnin  and  lfnout  before  copying 

fee  -  character  eat  of  lfnin 

0  -  display  code  or  6/12-bit  display 
code 

(default:  0;  no  other  value  allowed) 

fline  -  first  line  of  (sequenced)  file  to  be 
copied 
(default:  1) 

lline  -  last  line  of  (sequenced)  file  to  be 
copied 

(default:  controlled  by  n) 

ns  -  any  non-null  value  to  suppress  EOR/EOF 
display  in  lfnout 

Remrks:  Do  not  use  with  S,  L,  F  or  SI  tapes. 

A  file  without  an  EOR  will  have  one  added  to  the 
end  of  the  listing. 

See  also:  COPT  (S,  L,  F  tapes),  TCOPY  (SI  tapes) 

Similar  commands:  NOS/BE:  LISTEOI;  LISTZ  (both  DTRC) 
Examples:  SCOPY.myf ile. 


SCREEN  (IAF)  Set  your  terminal  for  screen  mode. 
Syntax:  SCREEN , TM-mode 1 . 

SCREEN, model. 

Parameters:  model  -  the  terminal  mode 


model 

meaning 

DTI  00 

DEC  VTlOO-compatible  for 

FSE  at  DTRC 

VT100 

alternate  DF.C  VTlOO- 

compatible 

other 

call  User  Services 

omitted 

no  change 

mode IT  -  append  T  for  type-ahead  capability 
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Remarks:  SCREEN  may  be  included  in  a  procedure. 

Affects  FSE,  HELPME,  screen  formatting,  and  the 
display  of  NOS  procedure  parameters. 

You  may  wish  to  put  " SCREEN, DTI 00. "  into  your 
LOGINPR  file. 

See  also:  LINE 

Examples:  SCREEN, DT100  < —  set  for  full-screen  editing 

FSE,myf ile.G.  < —  edit  in  full-screen  mode 


SET  Assign  a  value  to  a  control  register,  an  error  flag,  or  the 

enter-skipped-commands-in-the-dayf ile  flag;  change  the  current 
interactive  subsystem. 

Syntax:  SET,symbl~expl,symb2~exp2, . . . , symbn-expn . 

Parameters:  symbi  -  one  of: 

name  meaning 

local  control  registers 
(initial  value:  0) 
global  control  register 
(initial  value:  0) 
local  error  flag 
(initial  value:  0) 
global  error  flag 
(initial  value:  0) 
dayfile  skipped  command 
flag 

0  -  do  not  put  skipped 
commands  into  dayfile 
1  ~  put  skipped  commands 
into  dayfile 
(initial  value:  0) 
page  length  (or  page  size) 
(default:  60) 
page  width 
(default:  136) 
page  density 

(default:  6  lines  /  inch) 
interactive  subsystem 


Rl,  R2,  R3 

RIG 

EF 

EFG 

DSC 


PL  or  PS 
PW 
PD 
SS 
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expi  -  any  valid  expression 

symbol  range 


Rl,  R2,  R3,  RIG  -131071  to  131071 
EF,  EFG  0  to  63 

DSC  1  or  0 

PL  or  PS  16  to  255 

PW  40  to  255 

PD  6  or  8 

SS  ACCESS,  BASIC,  BATCH, 

EXECUTE,  FORTRAN, 
FTNTS,  NULL 

Similar  coaaandi :  Cray,  NOS/BE:  SET 

VMS:  $  var  “  value  (DCL) 

Examples:  SET,R1“0. 

WHILE, R1-5.L00PEND. 

SET.R1-R1+1. 

ENDW ,  LOOPEND . 


SETASL  Set  the  SRU  limit  for  an  accounting  block. 

Syntax:  SETASL, s. 

SETASL,*.  < —  set  to  your  maximum  SRU  limit 

Parameters:  s  -  maximum  number  of  SRUa  allowed 

(decimal,  or  octal  with  B  suffix) 

(generally,  s  must  be  >“  the  current  job  step 
SRU  count  and  <■  your  SRU  limit) 

See  also:  SETJSL 

Examples:  SETASL, 2000. 


SETCORE  Preset  each  word  of  the  field  length  except  for  RA+2. 

Syntax:  SETCORE, p. 

SETCORE, -p. 

Parameters:  p  -  desired  setting  (~p  sets  the  complement  of  p) 

p  fill  characters 


0  0 

ZERO  zeros  (0) 

INDEF  indefinite  (1777  0000  ...  0000) 

INF  infinite  (3777  0000  ...  0000) 

(Default:  0) 


Page  D-96 


RevO 


88/10/01 


Remarks:  To  preset  aeaory  with  a  load  sequence,  use 

LDSET, PRESET. 

Examples:  RFL, 100000. 

SETCORE.  < —  immediately  clear  FL  to  0. 

SETFS  Set  the  auto-drop/no-auto-drop  status  of  files  assigned  to 
your  job. 

Syntax:  SETFS, lfnl , lfn2 , . . . , lfnn/FS-f s . 

Paraaeters:  FS-  -  auto-drop  status 

fs  meaning 


AD  auto-drop 
NAD  no-auto-drop 

Resurks:  Files  with  no-auto-drop  set  are  not  returned  by 

CLEAR,  RETURN (*),  or  UNLOAD (*) . 

Exaaples:  SETFS, fyll,fyl2/FS-NAD. 


SETJOB  Change  soae  of  the  current  job's  attributes. 

Syntax :  SETJOB , VJNmujn , DC*dc , 0P*op . 

SETJOB,ujn,dc,op. 

Paraaeters:  ujn  -  new  job  naae 

dc  -  disposition  code 

dc  meaning 

TO  queue  output  with  wait  disposition 
NO  discard  output  (no  dayfile) 

DF  default  output  processing 

op  -  job  processing  option 

op  aeaning 


SU  job  reaains  suspended  until 
recovered  or  timed  out 
TJ  systea  terminates  the  job 

See  also:  RECOVER 


Exaaples 


SETJ0B,xxxx,N0. 
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SETJSL  Set  the  SRU  liait  for  each  subsequent  job  step. 

Syntax:  SETJSL, s. 

SETJSL,*.  < —  set  to  your  aaxiaua  SRU  liait 

Paraaeters:  s  -  aaxiaua  nuaber  of  SRUs  for  job  step  execution 
Exaaples:  SETJSL, 250. 

SETPR  Do  not  use  at  DTRC. 

SETTL  Set  the  CPU  tiae  liait  for  each  subsequent  job  step. 

Syntax:  SETTL, t. 

SETTL,*.  < —  set  to  unliaited 

Paraaeters:  t  -  aaxiaua  nuaber  of  CPU  seconds  for  job  step 
execution 

(default:  64  decimal) 

See  also:  ENQUIRE,  LIMITS 

Siailar  coaaands:  NOS/BE:  ETL  (Intercoa) 

Exaaples:  SETTL, 5. 

SHOW  (IAF)  Display  a  screen  foraatting  panel  for  testing  purposes. 
Syntax :  SHOW , I-panelnaae . 

Paraaeters:  I*  ~  the  naae  of  a  coapiled  panel  in  user  library 
PANELIB  or  in  a  global  library  set 

Reaarks:  SHOW  is  an  interactive  procedure  (?  for  help). 


Page  D-98 


RevO 


88/10/01 


SKIP  Unconditionally  skip  succeeding  coaunds ,  ending  with  an  ENDIF 
with  a  Batching  label. 

Syntax:  SKIP, label. 

Paraaeters:  label  -  alphanumeric  string  (1-10  characters, 

starting  with  a  letter) 

See  also:  ENDIF 

Similar  commands:  NOS/BE:  SKIP 
VMS:  GOTO 

Examples:  IF(R1<-1,D0NE) 

•  •  e 

SKIP (DONE) 

IF(R1-2,D0NE) 

•  e  e 

SKIP (DONE) 

•  e  • 

ENDIF (DONE) 


SKIPEI  Position  a  File  at  end~of-inforaation. 

Syntax:  SKIPEI, lfn. 

Remarks:  On  magnetic  tape  with  no  EOI  defined,  stops  at 

EOF. 

See  also:  SKIPF,  SKIPFB,  SKIPR 

Similar  commands:  Cray:  SKIPD 

NOS/BE:  EOI  (DTRC) 

VMS:  OPEN  with  ACCESS-APPEND  in  a 

program 

Examples:  SKIPEI, myfile. 


SKIPF  Skip  forward  a  specified  number  of  files. 

Syntax:  SKIPF, lfn,n,a. 

Paraaeters:  n  -  decimal  number  of  files  to  skip 
(default:  1;  max:  262143) 

a  -  coded  or  binary 

a  meaning 


B  binary 
C  coded 

(default:  B;  C  with  SI  tape  is  fatal) 
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Remarks:  Hill  atop  at  EOI. 

See  also:  SKXPEI,  SKIPFB,  SKIPR 

Siailar  commands:  Cray:  SRIPD;  SKIPF;  SKIPR;  SKIPU 

NOS/BE:  SKIPF 

Examples:  SKIPF,myf ile,4,C. 

A —  skip  4  coded  files 


SKIPFB  Skip  backward  a  specified  nusiber  of  files. 

Syntax:  SKIPFB, lfn,n, a. 

Parameters:  n  -  decimal  number  of  files  to  skip 
(default:  1;  max:  262143) 

a  -  coded  or  binary 

a  meaning 

B  binary 
C  coded 

(default:  B;  C  with  SI  tape  is  fatal) 
Remarks:  Hill  stop  at  BOX. 

See  also:  SKIPEI,  SKIPF,  SKIPR 

Siailar  commands:  Cray:  SKIPD;  SKIPF,'  SKIPR;  SKIPU 

NOS/BE:  BKSP;  SKIPB 

Examples:  SKIPFB.ayf ile,4,C. 

A —  skip  back  4  coded  files 
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SRIPR 


SLOAD 


Skip  forward  a  specified  nuaber  of  record  or  file  marks. 
Syntax:  SKIPR, lfn.n, level ,a. 

Parameters:  n  -  decimal  nuaber  of  files  to  skip 

(default:  1;  aax:  262143) 

level  -  level  nuaber  (0-17) 

0-16  -  EORs  and  EOFs  counted 
17  -  EOFs  counted 

(default:  0) 


a  -  coded  or  binary 

a  meaning 

B  binary 
C  coded 

(default:  B;  C  with  SI  tape  is  fatal) 
Remarks:  Consecutive  EORs  or  EOFs  are  counted  separately. 

Hill  stop  at  EOI. 

See  also:  SKIPEI,  SKIPF,  SKIPFB 

Similar  commands:  Cray:  SKIPD;  SKIPF;  SKIPR;  SKIPU 

NOS/BE:  SKIPR 


Examples:  SKIPR,ayfile,4, 17. 

A- —  skip  4  binary  files 


(Loader)  Selective  load  modules  from  a  file. 

Syntax :  SLOAD , 1 f n , name 1 , name 2 , . . . , naaen . 

Paraaeters:  lfn  -  the  file  froa  which  the  listed  modules 

are  to  be  loaded 

naaei  -  the  naae  of  a  module  to  be  loaded 

See  also:  LIBLOAD 

Similar  commands:  NOS/BE:  SLOAD 

VMS:  LINK  file/ INCLUDE” 

Examples:  SLOAD, mybin , suba, subb, sub*. 


) 
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SORT  This  deals  with  sequenced  Piles  and  is  NOT  the  Sort/Merge 
prograa. 

Remarks:  SORTS  is  the  Sort  prograa;  MERGE  is  the  Merge 

prograa. 


SORT5  Sort  files. 

Syntax:  FILE, lfninl, . . . . 

FILE, lfnin2, .... 

•  e  e 

FILE, lfnout . 

SORT5 . pi , p2 , . . . , pn 
or 

SORT5.pl  p2  ...  pn 

Positional:  S0RT5 . f roa, to, key, dir , 1 , ,e,el, 

dialog, end, , , ownf , ownfl , 
ownarl, , ownl,own2,own3, 
own4 , own5 .retain , seqa , 
seqn,seqr,seqs, status, sun, , 
verify, fastio. 

Interactive:  S0RT5 . DIALOG-YES 

Directive  file:  SORT5.DIR-lfn 

SORT5 . paraas , DIR- 1 f n 
SORT5 . DIR- 1 f n , paraas 
SORT5.paraas,DIR-lfn, .. 
.aorejparaas 

Paraaeters:  FROM- 1 f n 

FROM- (1 f nl , 1 fn2 , . . . , 1 f nn) 

Up  to  100  input  files,  read  in  the  order 
specified,  noraally  rewound  before  and 
after  use. 

TO-lfn 

The  file  to  receive  the  sorted  records, 
noraally  rewound  before  and  after  use. 

KEY-(key__def  ,key_def , . . .) 

key_def  -  range  -or- 

(range, type.ad)  -or~ 

(first, length, type, ad) 
range  -  first  -or- 

f irst . . last 

first  -  first  byte/bit  of  key  field 
last  -  last  byte/bit  of  key  field 
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length  -  number  of  bytes/bits  in  key 
(default:  1) 

type  -  name  of  numeric  data  format 
or  collating  sequence 
(default:  ASCII6) 
ad  -  order:  A  (ascending) 

D  (descending) 

(default:  A) 

Up  to  100  key-defs  may  be  specified. 

Keys  are  sorted  first  by  the  leftmost 
key_def . 

If  no  keys  are  specified,  KEY-1 . .mnr 
(minimum  record  length;  smallest  MNR  or 
smallest  FL  or  MRL  on  FILE  statements)  is 
used. 

DIR-lfn 

DIR- (lfnl, lfn2, ...) 

Read  SORT5  parameters  from  one  or  more 
files. 

(default:  no  directive  file  is  read;  the 

parameters  of  the  SORT5  statement 
completely  define  the  sort) 

L-lfn 

Output  listing  information. 

(default:  OUTPUT) 

E-lfn 

Error  listing  file. 

(default:  the  L-  file) 

EL-el 

Error  level  to  be  reported: 

T  -  trivial  +  W,  F,  C 
W  -  warning  +  F,  C 
F  -  fatal  +  C 
C  -  catastrophic 
(default:  W) 

DIALOG-YES  or  DIA-Y 

Interactive  dialog.  May  appear  only  in  the 
SORT5  control  statement.  All  information 
for  the  sort  is  entered  in  response  to 
questions.  All  other  parameters  specified 
in  the  S0RT5  statement,  except  STATUS,  are 
ignored. 
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ENR~expr 
ENR-expr. . expr 

The  estimated  number  of  records  to  be 
sorted  (single  decimal  integer  0~10**9, 
a  range  of  values,  or  one  of  the  CCL 
variables:  Rl,  R2,  R3,  RIG,  EF,  or  EFG. 
(Use  especially  if  ENR  <  1500) 

RETAIN“retain  or  RET*r 

Specify  the  order  for  records  with  equal 
sort  Keys. 

retain  meaning 


YES  or  Y  records  with  equal  keys  retain 
their  original  order 

NO  or  N  records  with  equal  keys  might 

not  retain  their  original  order 
(default:  NO) 

STATUS'variable  or  ST“variable 

Report  the  SORT5  status  to  one  of  the  CCL 
variables:  Rl,  R2,  R3,  RIG,  EF,  or  EFG. 


code 

meaning 

0 

no  errors 

20 

trivial 

30 

warning 

40 

fatal 

50 

catastrophic 

Remarks:  Each  line  of  the  S0RT5  control  statement  or  the 

directive  file  may  be  up  to  100  characters,  but 
characters  beyond  column  80  are  ignored. 

Batch:  To  continue  on  more  than  one  line,  end  one 
line  with  two  periods  and  start  the  next 
line  with  one  period.  CAUTION:  because  a 
line  range  is  indicated  by  two  periods, 
ranges  must  not  be  continued. 

Interactive:  Lines  cannot  be  continued.  If  more 
than  one  line  is  needed,  use  a 
directive  file  or  a  procedure. 

FILE  statements  are  required  for  each  file.  The 
maximum  record  is  specified  with  the  FL  parameter 
(if  RT*Z  or  F)  or  MRL  parameter  (all  others). 

In  the  positional  illustration  above,  reserved 
positions  are  indicated  by  adjacent  commas. 


,1 
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See  Sort/Merge  Version  5  Reference  Manual, 
60484800,  for  other  parameters. 

See  also:  MERGE 

Similar  commands:  Cray,  VMS:  SORT 
NOS/BE:  SORT5 

Examples :  FILE, inf yl , BT-C.RT-2 .MRL-80. 

FILE,outfyl,BT-C,RT-Z,MRL-640. 

S0RT5 . inf y 1 , out  f y 1 , 5 . . 10 

A —  sort  columns  5-10  into  ascending 
ASCI 16  order 

S0RT5 . FROM- inf y 1 , KEY- ( (5 . . 10 , , D) ) , TO-out  f y 1 
A —  same,  except  descending 


S0RT5. KEY-6.. 25 

A —  sort  one  20-byte  key  starting  in 
byte  6 

SORT5 . KEY- ( (6 , 20) ) 

A —  same  as  above 

SORT5 . KE Y- (6 , 20) 

A —  sort  two  1-byte  keys  (major  key 
in  byte  6,  minor  key  in  byte  20) 

SORT5. KEY-6, 20 

A —  sort  byte  6,  read  directives 
from  local  file  "20"  (this  is 
the  next  positional  parameter) 


STIME  Put  the  accumulated  SRU  value  for  the  job  into  the  dayfile. 
Syntax:  STIME. 

See  also:  CTIME,  ENQUIRE, S,  RTIME 

Similar  commands:  NOS/BE:  ASSETS,  PTIM  (DTRC) ,  SUMMARY 
VMS:  AT 


Examples:  STIME. 


SUBMIT  Put  a  job  into  the  input  queue. 

Syntax:  SUBMIT ,lfn,q, NR. c 

Parameters:  lfn  -  the  file  to  be  submitted  -  the  first  record 
must  be  in  6~bit  display  code 


t  A 
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q  -  output  disposition 

BC  or  B  -  central  site 
NO  or  N  -  discard  output  unless 
specifically  routed  - 
no  dayfile 

RB-un  -  route  output  to  a  remote 

batch  terminal  or  interactive 

user 

TO  -  queued  with  wait  disposition 

NR  -  do  not  rewind  the  submit  file  or  cREAD  file 
before  or  after  processing 
(Default:  rewind) 

c  -  prefix  character  for  reformatting 

directives  in  the  file  (assumes  /JOB  is  the 
first  statement) 

(Default:  /) 

Remarks:  For  both  direct  and  indirect  files. 

See  also:  CSUBMIT,  ROUTE 

Similar  commands:  Cray:  SUBMIT 

NOS /BE:  ROUTE . DC- IN 

VMS:  SUBMIT;  CRAY  SUBMIT 

Examples:  SUBMIT, my job,BC. 

* —  print  at  Central  Site 

SUBMIT, myj  ob , RB-xxxx . 

A —  use  QGET  to  retrieve  output  from 
print  queue 

SUBMIT, my job, TO. 

A —  use  QGET  to  retrieve  output  from 
wait  queue 


SWITCH  Set  sense  switches. 

Syntax:  SWITCH, switch_l, switch_2, . . . ,switch_n, jsn. 

Parameters:  switch_i  -  switch  to  be  set  (1-6) 

0  -  set  all  switches 

jsn  -  may  appear  in  any  parameter  position 

(Default:  the  current  job) 

Similar  commands:  Cray,  NOS/BE:  SWITCH 

Examples:  SWITCH, 1,3,5. 

A —  turn  on  sense  switches  1,  3,  5 
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TCOPY  Copy  X  (binary),  E,  B,  or  SI  file*  to  disk,  I,  or  SI  (binary) 
tap*. 

Syntax:  TCOPY, lfn_in, lfn_out , format , tc , copycnt , charcnt , 

erlimit ,plp2, lfnlat,ns. 

TC0PY,I*lfn_in,0**lfn_out,F“format,TC*tc, 

N*copycnt , CC“charcnt , EL“*r 1 imi t , PO“plp2 , 
L*lfnlat,NS*na. 

Parameter*:  I-  -  input  file  to  be  copied 
(default:  INPUT) 

0“  -  the  output  copied  file 

(default:  OUTPUT) 

CC-  -  maximum  number  of  characters  in  E  or  B  tape 
block 

(default:  136  (E) ,  150  (B)) 

EL“  -  number  of  non-fatal  errora  before  abort; 
EL“U  for  unlimited  error  proceaaing 
(default:  0;  ignored  for  E/B  output  or 
terminal  input) 

F-  -  type  of  conversion 

format  meaning 


E  E  tape  to/from  disk,  I,  SI 

binary  tape  (E  tape  unlabelled 
and  assigned  as  S) 

B  B  tape  to/from  disk,  I,  SI 

binary  tape  (B  tape  unlabelled 
and  assigned  as  S) 

X  X  tape  to  disk,  I,  SI  binary 

tape  (X  tape  unlabelled  and 
assigned  as  S  with  noise  size 
of  8  frames  (7-track)  or  6 
(9-track)) 

SI  SI  tape  to/from  disk,  I,  SI 
binary  tape  (SI  tape  is 
labelled  or  unlabelled  and 
assigned  as  S) 

(default:  X) 

L-  -  alternate  file  for  parity  error  messages 
for  EL<>0;  cannot  be  same  as  Is,  0- 
(default:  OUTPUT) 

N-  -  copy  count  (meaning  determined  by  TC~) 
(default:  N-l) 
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NS“  _  noiae  size  for  E  to  B  conversion 

(maximum:  41;  NS“0  uses  default  of  18) 

PO“  -  processing  options: 

pi  meaning 


E  copy  input  blocks  with  parity  or 
block-too-long  errors 
(default:  error  blocks  skipped) 

T  truncate  long  blocks  for  E/B  output 
(default:  split  into  multiple  blocks) 

TC*  -  termination  condition  with  N* 
tc  meaning 


F  or  EOF  N  is  number  of  files 

I  or  EOI  N  is  ignored 

(copy  to  end-of-information) 

D  or  EOD  N  is  number  of  double  EOFs  to 
copy  to 

(default:  TOD) 

See  also:  COPY  (S,  L,  F  tapes) ,  SCOPY  (display  EOR/EOF) 

Similar  commands:  Cray: 

NOS/BE:  COPY;  C.OPYBF;  COPYBR;  COPYCF; 
COPYCR;  COP ye;  copyf;  copyr; 
COPYRM  (last  4  DTRC) 

Examples:  TCOPY,tape,disk,SI,I. 

A —  copy  a  complete  NOS/BE  tape 


TDU  (IAF)  Compile  a  terminal  definition  file  and  store  it  in  a 

user  library  which  can  later  be  accessed  by  a  SCREEN  or  LINE 
command. 

Syntax:  TDU,I*def ini t i on, L*listing, LIB* library. 

Parameters:  1“  -  the  terminal  definition  file  in  6/12-bit 

display  code 

L*  -  the  output  listing  file 
(default:  OUTPUT) 

LIB1*  -  the  library  to  receive  the  load  capsule 
(default:  TERMLIB) 


Remarks 


TDU  may  appear  in  a  procedure. 


Page  D-108 


RevO 


88/10/01 


TDUMP  Octal  or  alphanumeric  dump  of  all  or  part  of  a  file. 

Syntax:  TDUMP, pl,p2, . . . , pn. 

Parameter*:  I-lfn  -  local  file  to  be  dumped 

(default:  TAPE1) 

L“lfn  -  listable  output  (never  rewound) 
(default:  OUTPUT) 

0  -  octal  dump  only 

A  -  alphanumeric  dump  only 

(if  both  specified,  last  is  used) 
(default:  octal  and  alphanumeric) 

R-rcount  -  decimal  maximum  number  of  records  to 
dump  (restarts  for  each  file) 

(default:  omitted  or  R**0:  dump  to  EOI) 

F*f count  -  decimal  maximum  number  of  files  to  dump 
(default:  dump  to  EOI;  F**0  ->  dump 
until  double  EOF  or  EOI) 

N-ncount  -  decimal  maximum  number  of  lines  to  dump 
(default:  omitted  or  N-0:  dump  to  EOI) 

NR  -  do  not  rewind  input  file 

Similar  commands:  NOS/BE:  TDUMP 

Examples:  LABEL, TAPE1, ... . 

TDUMP. 

TRMDEF  (IAF)  Change  terminal  characteristics.  Use  in  your  prologue 

to  set  terminal  characteristics  if  you  normally  use  a  terminal 
other  than  the  default  kind. 

Syntax:  TRMDEF, L“1 f n, tc l“vl, . . . ,tcn-vn. 

Parameters:  L"lfn  -  listable  output 

tci~vi  -  new  terminal  characteristic (s) 
vi  meaning 


v  any  alphanumeric  character 

(e.g.,  $*$;  display  code  0-44B) 
$v$  any  character  (dollar-delimited) 

(for  "$",  user  $$$$) 
vwB  octal  value  ASCII  character 
(e.g.,  52B  (same  as  $*$)) 
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wD  decimal  value  of  ASCII  character 
(e.g.,  A 2D  (aaae  aa  $*$)) 

Hw  hexadecimal  value  of  ASCII 
character 

(e.g.,  X2A  (sane  a a  $*$)) 

Similar  comsunds:  VMS:  SET  TERMINAL 

Examples:  TRMDEF,EP*Y.  < —  put  into  LOGINPR  to  aet  terminal 

to  half  duplex  (echo  on)  for 
thia  login 


ULIB  Create  a  uaer  library;  add,  delete  or  replace  a  record. 

Syntax :  ULIB , OP-operation , REC*record, LIB**1 ibrary . 

ULIB, operation, record, library. 

ULIB?  < —  help  about  command  and 

prompting  for  parameters 

ULIB, parameter?  < —  help  on  the  parameter  and 

prompting  for  parameters 

Parameters:  OP*  -  one  of  the  following  operations 

operation  meaning 


C  create  a  new  user  library 

A  add  a  record  (same  as  R) 

D  delete  a  record 

R  replace  a  record  (same  as  A) 

F  extract  a  record  and  make  it 

local 

REC*  ~  name  of  the  record  to  be  added,  deleted, 
replaced,  or  extracted  (must  be  the  name 
of  a  local  file) 

LIB*  -  the  local  library  file  to  be  created  or 
modif ied 

Remarks:  Affects  only  the  local  copy.  Use  SAVE  or  REPLACE 

to  make  the  library  permanent. 

For  OP*A,  D  or  R,  ULIB  returns  the  original 
library  an  creates  a  new  local  file  —  so  ULIB 
cannot  modify  a  library  on  a  direct  file. 
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UNLOAD 


UNLOCK 


UPDATE 


Similar  commands:  Cray,  NOS/BE:  UPDATE 

VMS:  CMS;  LIBRARIAN; 

INCLUDE  (in  FORTRAN) 

Examples:  ULIB.C, ,mylib. 

Release  £iles  assigned  to  your  job  and  perhaps  their  file 

space. 

Syntax:  UNLOAD, lfnl, If n2 . lfnn.  <—  specified  files 

UNLOAD,*, lfnl, lfn2 . lfnn.  <--  all  but 

specified  files 

Similar  commands:  NOS/BE:  UNLOAD 
Examples:  UNLOAD, myf ile. 


Rescind  the  LOCK  command  and  clear  the  write  interlock  for 
specified  local  disk  files. 

Syntax:  UNLOCK, lfnl , lfn2, ..., lfnn. 

Remarks:  Library  files  cannot  be  unlocked. 

See  also:  LOCK 

Examples:  See  LOCK. 


Create,  edit  or  copy  a  program  library. 

Syntax:  UPDATE, pl,p2, ... ,pn. 

Parameters:  Note:  file  parameters  (C,  G,  I,  K,  N,  0,  S,  T) 
may  be  followed  by  6  (6-bit  display  code) 
or  8  (7-bit  ASCII  —  also  requires  18) 

pi  meaning 

A  copy  old  sequential  PL  to  new 

random  access  PL 

B  copy  old  random  access  PL  to  new 

sequential  PL 
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C-lfn 

write  compile  file  on  lfn 

C-PUNCH 

implies  D  and  8  parameters 

C 

same  as  C- COMPILE 

omitted 

same  as  C*C0KPILE 

C-0 

no  compile  output 

(Note:  C  is  ignored  if  K  is  used) 

D 

compile  file  is  80  characters 

omitted 

compile  file  is  72  characters 

E 

edit  the  old  PL 

(to  completely  edit,  use  E  on  two 
UPDATE  commands  —  the  first  will 
rearrange  the  directory  and  remove 
purged  identifiers  —  the  second 
will  remove  identifiers  appearing 
only  in  the  file's  directory 

F 

full  Update  node 

G-lfn 

output  file  for  PULLMOD  directives 

omitted 

appended  to  the  S  file 

H-n 

one  of: 

3  -  use  63-character  set 

4  -  use  64-character  set 
omitted  -  use  old  PL  char  set 

1*1  fn 

primary  input  directive  file 

1-0 

no  input  directives 

omitted 

same  as  I- INPUT 

(Note:  6/12_bit  ASCII  if  INPUT  is 
connected,  else  6-bit 
display  code) 

K-lfn 

compile  file  with  decks  in  order  of 
COMPILE  directives 

K 

saae  as  K*C0MPILE 

omitted 

no  input  *C0MPILE  directives 

L*elc2. . . cn 

list  options  —  one  or  more  of: 

A  -  list  deck  names,  correction 


set  identifiers,  COKDECK 
directives,  definitions, 
eoapile  file  decks 
F  -  saae  as  L*A123456789  (not  0) 
0  -  no  listing 

1  -  error  lines 

2  -  active  UPDATE  directives 

3  -  notes  on  each  line  with 

changed  status 

4  ~  text  lines 
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M«lfn 

M 

omitted 


N-lfn 

N 

N-0 

omitted 


0-1  fn 
0-0 

omitted 

P-lfn/sl/s2/. 

P 

P-0 

omitted 


Q 


R-clc2. .c4 


R 

omitted 


5  -  ective  compile  file 

directives 

6  -  ective  end  inective  lines 

7  -  ell  ective  lines 

8  -  ell  inective  lines 

9  ~  correction  history  of  options 

5,  7,  8 

Defeults:  L-A1234  (correction  run) 
L-Al  (copy) 

merge  with  old  PL 
same  as  M-HERGE 
no  merging 

(Note:  both  libraries  must  have  the 
seme  character  set) 

new  program  library 
same  as  N-NEWPL 
no  new  program  library 

same  as  N-0 

(Note:  default  character  set  is 
that  of  0LDPL  (except  if 
0LDPL  is  6-bit  display  code 
and  I  file  is  7-bit  ASCII, 
then  NEWPL  is  7-bit  ASCII)) 

listable  output  file 
no  listable  output 
same  as  0-0UTPUT 


../s7 

the  old  program  library 

same  as  P-0LDPL 

no  old  program  library 

same  as  P-0LDPL 

(si  are  secondary  old  PLs) 

quick  mode  (process  only  decks  on 
COMPILE  directives) 

files  to  rewind  before  and  after 
C  -  compile  file 
N  -  new  PL 

P  -  old  and  merge  PLs 
S  -  source  and  PULLMOD  files 
no  rewind 

same  as  R-CNPS  (not  merge  PL) 
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S-lfn  output  source  file 

S  tut  as  S“S0URCE 

S-0  no  output  source  file  unless  T“lfn 

is  specified 

oaitted  saae  as  S”0 

T-lfn  saae  as  S"lfn,  except  that  coaaon 

decks  are  excluded 
(Note:  takes  precedence  over  S) 

U  do  not  abort  for  fatal  errors 

W  the  new  PL  is  sequential 

oaitted  the  new  PL  is  randoa  (except 

sequential  on  aagnetic  tape) 

X  coapile  file  is  coapressed 

oaitted  coapile  file  is  not  coapressed 

8  coapile  file  is  80-character  lines 

oaitted  coapile  file  is  90-character  lines 

*“char  aaster  control  character  (any  6-bit 

octal  value  01-50,  53-54) 
oaitted  sister  control  character  is  * 

/■char  coaaent  control  character  (a-Z, 

0-9,  +-*/$-) 

oaitted  aaster  control  character  is  / 

(Note:  do  not  use  a  coaaand  abbre¬ 
viation  for  <char>  unless 
N0ABBREV  is  in  effect) 

See  also:  Section  5-4 

Siailar  coaaands:  Cray,  NOS/BE:  UPDATE 

VMS:  CMS;  LIBRARIAN 

Exaaples:  NOTE, uin. /*C0MPILE  A,B,C 

UPDATE, I-uin. 

FTN5.I. 

RETURN, uin. 

EXIT. 

RETURN, uin. 


/UPDATE. 

?  *c  a,b,e 
?  <CR> 


< —  interactive 
< —  enter  UPDATE  directive (s) 
< —  end-of-file 
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UPROC  Specify  a  user  prologue  to  be  executed  each  time  you  start  a 
batch  or  interactive  job. 

Syntax:  UPROC, FN-p£ile. 

UPROC, pfile. 

Parameters:  pfile  -  a  permanent  file  with  the  prologue. 

0  -  no  longer  execute  a  user  prologue 
(Default:  0) 

Remarks:  If  your  prologue  is  long,  you  may  wish  to  include 

RECOVER  processing. 

LOGINPR  is  the  preferred  name. 

UPROC  is  normally  executed  once  to  let  NOS  know 
that  you  have  such  a  file. 

If  you  purge  your  prologue  file,  future  batch 
jobs  will  abort. 

Similar  commands:  NOS/BE:  existence  of  your  file  LOGFILEtid 
VMS:  existence  of  your  file  LOGIN.COM 

Examples:  /FSE, loginpr . 

<  create  your  procedure  > 

11  QR  < —  save  the  file 

/UPROC, loginpr. 

USER  Identify  you  and  provide  validation  information  for  each  batch 
job. 

Syntax:  USER, username, pas sword 

Parameters:  username  -  your  4-character  User  Initials 

password  -  your  4-  to  7-character  password 

Remarks:  This  must  immediately  follow  your  job  statement. 

Similar  commands:  Cray:  ACCOUNT 

NOS/BE:  CHARGE 


Examples 


USER , xxxx , mypw 
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VERIFY  Compare  files  in  binary  node. 

Syntax:  VERIFY, lfnl, lfn2.pl, p2, . . . ,pn. 

Parameters:  lfnl  -  first  file  to  be  compared 

(default:  TAPE1) 

lfl2  -  second  file  to  be  compared 
(default:  TAPE2) 

A  -  abort  after  completion  if  errors 

BS“bs  -  maximum  block  size  for  S,  L  tapes 

(defaults:  1000B  words  (S) ,  2000B  (L)) 

C  -  both  files  coded  (S,  L  tapes  only) 

Cl  -  first  file  coded  (S,  L  tapes  only) 

C2  -  second  file  coded  (S,  L  tapes  only) 

E“y  -  maximum  number  of  errors  to  list 

(default:  100) 

E  -  same  as  E"0 

L**lfn  -  error  output  file 

(default:  OUTPUT) 

N-x  -  number  of  files  of  multi-file  file 
(default:  1) 

N  -  compare  until  EOI  on  both  files 

N-0  -  compare  until  empty  file  in  either  file 

R  -  rewind  both  files  before  and  after 

Remarks:  On  mismatch,  the  record  number,  word  within  the 

record,  and  the  words  from  both  files  which  do 

not  match  are  listed. 

Your  terminal  should  be  in  NORMAL  mode  (not 
ASCII)  before  listing  VERIFY  output  at  your 
terminal . 

See  also:  VFYLIB 

Similar  commands:  Cray,  NOS/BE:  COMPARE 
Examples:  VERIFY, fyll, fyl2,N,R. 
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VFYLIB  List  differences  in  name,  type,  length,  and  checksum  for  the 
records  of  two  library  files. 

Syntax:  VFYLIB, lfn_l,lfn_2,lfn_3, NR. 

Parameters:  lfn_l  -  first  file 

lfn_2  -  second  file 

lfn_3  -  the  listable  output  file 

NR  -  do  not  rewind  lfn_l  and  lfn_2  after 
processing 

Defaults:  VFYLIB, OLD, NEW, OUTPUT. 

Remarks:  lfn_l  and  lfn_2  are  rewound  before  comparing. 

Your  terminal  should  be  in  NORMAL  mode  (not 
ASCII)  before  listing  VFYLIB  output  at  your 
terminal . 

See  also:  VERIFY  (binary  comparison) 

Similar  commands:  Cray:  ITEMIZE 

NOS/BE:  ITEMIZE;  COMPAR 
VMS:  DIFFERENCES 

Examples:  VFYLIB, fyll.fyl 2, out. 

VSN  Associate  a  local  file  name  with  one  or  more  volume  serial 

numbers . 

Syntax:  VSN, lfn_l*,vsn_l , lfn_2-vsn_2, . . . , lfn_n-vsn_n. 

Parameters:  lfn_i  -  local  file  name 

vsn_i  -  1-  to  6-character  vsn's  to  be  associated 
with  lfn_i 

($-delimited  if  any  non-alphanumerics) 
vsn_i  meaning 


omitted  any  available  scratch 

tape  is  assigned 
automatically 

0  same  as  omitted 

SCRATCH  same  as  omitted 

vsna-vsnb". . .”vsnn  duplicate  volumes 

(any  may  be  used) 

vsna/vsnb/. . ./vsnn  successive  volumes 

(must  be  used  in 
listed  order) 
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See  also:  LABEL 

Similar  commands:  NOS/BE:  VSN 

Examples:  VSN,tape“NA9876. 

WHATJSN  (IAF)  Get  the  job  sequence  number  for  the  specified  user  name. 
Syntax:  WHATJSN, username 

Parameters:  username  ~  the  username  whose  jsn  is  desired 

Remarks:  You  must  be  in  the  ACCESS  subsystem. 

Similar  commands:  NOS/BE:  SITUATE 

VMS :  SHOW  USERS 

Examp 1 es :  ACCESS 

WHATJSN 

DIAL , j  sn , message 

WHATJSN, xxxx  < —  xxxx  is  someone's  user  initials 


WHILE  Start  of  a  command  loop. 

Syntax:  WHILE, exp, label . 

Parameters:  exp  -  any  valid  expression  evaluating  to  true 

or  false 


label  -  alphanumeric  string  (1-10  characters, 
starting  with  a  letter) 

Remarks:  The  loop  ends  with  an  ENDW  statement. 

See  also:  ENDW 


Similar  commands:  Cray:  LOOP 

NOS/BE:  WHILE 


Examples:  WHILE, Rl<5 , DOIT. 


SET.R1-R1+1. 
ENDW, DOIT. 
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WHO  (IAF,  DTRC)  List  the  users  currently  logged  in. 

Syntax:  WHO, If n. 

Paraneters:  lfn  -  output  file 

(default:  OUTPUT) 

Reaarks:  The  display  shows  the  total  number  of  users  who 

have  logged  in  since  the  last  system  deads tart, 
the  number  of  active  (logged  in)  users  (the  "D" 
suffix  indicates  a  decimal  number) ,  and  a  table 
showing  the  IAF  connection  number,  User  Initials, 
Job  Sequence  Number,  and  port  number  for  each 
logged-in  user.  An  asterisk  in  the  W  column 
indicates  the  user  has  been  sent  a  Warning 
message  by  the  operator  but  has  not  yet  received 
it  (messages  from  the  operator  while  you  are  in 
FSE  are  not  received  until  you  exit  from  FSE) . 

Similar  commands:  NOS/BE:  SITUATE 

VMS:  SHOW  USERS 

Examples:  WH0,whoout.  < —  write  the  display  in  local  file 

WHOOUT 


WHO  < —  display  at  the  terminal 

TOTAL  USERS  -  36D  ACTIVE  USERS  -  5D 


CONN 

USER 

JSN  W 

TERM 

3 

cara 

AADD 

T1200 

4 

TLIB 

AAFH 

T1210 

5 

CASG 

AAFW 

T1230 

6 

CTSC 

AAFX 

T1240 

7 

AMDS 

AAFZ 

T1610 

WHO  COMPLETE. 


WRITEF  Write  a  specified  number  of  file  marks  on  a  file. 

Syntax:  WRITEF, lfn, x. 

Parameters:  lfn  -  the  file  to  receive  the  file  marks 

x  -  decimal  number  of  file  marks  to  write 
(default:  1;  max:  262143) 

Remarks:  If  previous  write  was  not  an  EOR,  one  is  added. 


See  also: 


WRITER 
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WRITER 


X, BASIC 


C 


fc. 

* 


Similar  commands:  NOS/BE:  COPYBF;COPYCF;COPYF  an  empty  file 
Examples:  WRITEF.myf ile,2. 

Write  a  specified  number  of  empty  records  on  a  file. 

Syntax:  WRITER, lfn,x. 

Parameters:  lfn  -  the  file  to  receive  the  empty  records 

x  -  decimal  number  of  empty  records  to  write 
(default:  1;  max:  262143) 

See  also:  WRITEF 

Similar  commands:  NOS/BE:  COPYBR.COPYCR.COPYR  an  empty 

record 

Examples:  WRITER, myfile,3. 

(IAF)  Execute  a  batch  command. 

Syntax:  X,ccc 

Parameters:  ccc  -  any  valid  batch  command  (up  to  80  chars) 

Examples:  X, BASIC  < —  compile  a  BASIC  program  without 

changing  to  the  BASIC  subsystem 

Compile  a  BASIC  program  without  changing  to  the  BASIC 

subsystem. 

Syntax:  X, BASIC, I“lfn,B“lfn. 

Parameters:  I”  -  the  BASIC  source  program 

omitted  ~  same  as  I-INPUT 

B“  -  the  output  object  module 

omitted  ~  execute  without  creating  object  module 

Similar  commands:  NOS/BE:  BASIC 

VMS:  RUN  (in  the  BASIC  subsystem) 

Examples:  X, BASIC, I^mybas. 

A —  compile  and  execute  (do  not 
create  an  object  module) 


X,  BASIC,  I**mybasi  ,B-mybaso.  < —  compile 

mybaso.  < —  execute 
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XMODEM  (IAF)  Transfer  a  file  between  NOS  and  a  PC  using  the 
Christensen  protocol. 

Syntax:  XMODEM, fn, td, ft, If , sp,ec,fm,cf . 

XMODEM , FN- fn , TD- t d , FT-f t , LF- 1 f , SP-sp , EC-ec , 
FM-fm,CF-cf. 

Parameters:  Required  (if  omitted,  you  will  be  prompted  for 

them) : 

fn  -  file  to  be  transferred 

td  -  transfer  direction 

td  meaning 


S  send  from  CYBER  to  micro 
R  send  from  micro  to  CYBER 

ft  -  file  type 


ft 

S/R 

meaning 

T 

S/R 

text  -  6-bit  display  code 

A 

S/R 

text  -  6/12-bit  display  code 

E 

S/R 

text  -  8/12-bit  ASCII 

B 

S/R 

CYBER  binary 

M 

S/R 

micro  binary 

S 

R 

automatic  based  on  special 
characters  in  the  first  block 

Similar  commands:  NOS/BE:  XMODEM  (DTRC) 
VMS:  use  KERMIT 


Examples: 


HELPME, XMODEM. 


88/10/01 


RevO 


Page  D-121 


/ABORT  (ICF)  Abort  an  interactive  Cray  job. 

Syntax:  /ABORT  (/AB) 

Remarks:  Hay  also  use  USER-BREAK-2  key. 

Similar  commands:  VMS  CRAY  context:  ABORT,  DROP,  KIU 
Examples:  /AB 

/ATTENTION  (ICF)  Send  an  attention  interrupt  to  the  interactive  Cray 
job. 

Syntax:  /ATTENTION  (/AT) 

Reisarks:  May  also  use  USER-BREAK-1  key. 

Similar  commands:  VMS  CRAY  context:  ATTENTION 
Examples:  /AT 

/BYE  (ICF)  Terminate  the  interactive  Cray  session. 

Syntax:  /BYE  HOLD  AP-NAM_application  (/B) 

/BYE  QUIT  AP«NAM_application 

Parameters:  same  as  /LOGOFF 

Remarks:  Equivalent  to  LOGOFF. 

Similar  commands:  VMS  CRAY  context:  BYE,  QUIT 

Examples:  /BYE 

/CONNECT  (ICF)  Logically  connect  to  another  terminal  (such  as  a 
plotter) . 

Syntax:  /CONNECT  terminal_name  (/C) 

Parameters:  terminal_name 

See  also:  /ENDCONNECT,  /ICFSTATUS 

Similar  commands:  VMS  CRAY  context:  ATTACH 
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/DISCARD  (ICF)  Discard  all  output  sent  to  the  terminal. 

Syntax:  /DISCARD  (/D) 

Similar  commands:  VMS  CRAY  context:  DISCARD 
Examples:  /D 

/ENDCONNECT  (ICF)  Terminate  the  logical  connection  between  a  master 
and  slave  terminal. 

Syntax:  /ENDCONNECT  (/ENDC) 

See  also:  /CONNECT 

Examples:  /ENDC 

/ENDPLAY  (ICF)  Terminate  reading  from  a  PLAY  file. 

Syntax:  /ENDPLAY  (/ENDP) 

See  also:  /PLAY 

Examples:  /ENDP 

/EOF  (ICF)  Send  an  end~of-file  to  COS. 

Syntax:  /EOF  (/EO) 

Similar  commands:  VMS  CRAY  context:  EOF 
Examples:  /EOF 

/HELP  (ICF)  Display  a  brief  description  of  an  interactive  Cray 
command. 

Syntax:  /HELP  command_name  (/ H) 

Parameters:  command_name  -  command  for  which  help  is 

requested 

(default:  a  list  of  all  inter¬ 
active  commands  and 
their  parameters) 

Similar  commands:  VMS  CRAY  context:  HELP 


Examples 


/H  EOF 
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/ICFSTATUS  (ICF)  Display  the  status  of  stations  and  terminals 
connected  to  ICF. 

Syntax:  /ICFSTATUS  (/I) 

Similar  commands:  VMS  CRAY  context:  ISTATUS 

Examples:  /I 


/LOGOFF  (ICF)  Terminate  an  interactive  Cray  session. 


Syntax: 


Parameters : 


/LOGOFF  HOLD  AP«NAM_application 
/LOGOFF  QUIT  AP-NAH_application 


(/LOGOF) 


HOLD  -  suspend  the  interactive  session 

QUIT  -  quit  the  interactive  session 
(default:  QUIT) 

AP“  -  the  next  application 

Remarks:  same  as  /BYE 

See  also:  /LOGON 

Similar  commands:  VMS  CRAY  context:  BYE;  QUIT 

Examp 1 es :  /LOGOFF 

/LOGOFF  HOLD  AP-ICF 


/LOGON  (ICF)  Start  an  interactive  Cray  session  (or  reconnect  to  an 
existing  session). 

Syntax:  /LOGON  MF-mf 

Parameters:  MF“  -  the  Cray  mainframe 

mf  meaning 


MCR  Cray  X-MP  at  DTRC 

Remarks:  LOGON  is  not  allowed  if  you  are  already  logged 

on. 


At  the  exclamation  prompt  (1).  enter  an  ACCOUNT 

statement. 


See  also:  /LOGOFF 

Similar  commands:  VMS  CRAY  context:  INTERACTIVE 

VMS:  CINT;  CRAY  INTERACTIVE 


Examples 


/LOGON 
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/PERIOD 


/PLAY 


/PREFIX 


(ICF)  Control  automatic  addition  of  a  period  terminator  to 
Cray  commands. 

Syntax:  /PERIOD  ON  (/PE) 

/PERIOD  OFF 

Parameters:  ON  -  ICF  supplies  the  terminating  period  on 
Cray  commands 

OFF  -  you  must  supply  the  terminating  period 
(default:  OFF) 

Examples:  /PE  ON 


(ICF)  Read  commands  and  data  from  a  NOS  file. 

Syntax:  /PLAY  filename  NOECHO  (/PL) 

Parameters:  filename  -  a  NOS  8/12-bit  ASCII  file 

NOECHO  -  N  -  do  not  echo  the  lines  as  they  are 

read 

(default:  echo  the  lines) 

Remarks :  /ENDPLAY 

Similar  commands:  VMS  CRAY  context:  PLAY 

Examples:  /PLAY  myascii 


(ICF)  Change  the  ICF  prefix  character. 

Syntax:  /PREFIX  pref ix_character  (/PR) 

Parameters:  pref ix_character  -  the  new  ICF  command  prefix 

character 

Remarks:  The  default  prefix  character  is  slash  (/) . 

To  restore  to  the  default,  use  "pPREFIX-/", 
where  "p"  is  the  current  prefix  character. 


Similar  commands: 

VMS  CRAY  context:  none 

Examples:  /PR— 

< —  change  to  tilde 

~ST 

< —  display  status 

-PR"/ 

< —  restore  to  slash 

/ST 

< —  display  status 
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/QUIT  (ICF)  Immediately  terminate  the  interactive  Cray  aeasion. 

Syntax:  /QUIT  HOLD  AP-NAM_application  (/Q) 

/QUIT  QUIT  AP"NAM_appl i cat i on 

Parameters:  same  as  /LOGOFF 

Remarks:  Can  also  use  LOGOFF  or  BYE. 

Similar  eomswnds:  VMS  CRAY  context:  BYE;  QUIT 

Examples:  /QUIT 

/RESUME  (ICF)  Resume  a  suspended  interactive  Cray  session. 

Syntax:  /RESUME  (/R) 

See  also:  /SUSPEND 

Examples:  /R 

/STATUS  (ICF)  Display  Cray  job  status. 

Syntax:  /STATUS  (/ST) 

Similar  commands:  VMS  CRAY  context:  ISTATUS;  JSTAT;  STATUS 
Examples:  /ST 

/SUSPEND  (ICF)  Suspend  an  interactive  Cray  session. 

Syntax:  /SUSPEND  (/SU) 

See  also:  /RESUME 

Examples:  /SU 

/*  (ICF)  An  ICF  comment  line. 

Syntax:  /*  comment 

Parameters:  comment  -  optional  text 

Similar  commands:  VMS  CRAY  context:  COMMENT ,  MESSAGE 

Examples:  /*  This  is  a  comment 
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NOS/BE  Description 


Put  the  accounting  summary,  up  to  the  current  point  in 
the  Job,  into  the  dayflle 
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Suppress  the  rest  of  the  current  output  buffer 
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*****  Appendix  F  ***** 

***  References  *** 

The  following  aanuals  describe  various  features  of  the  Cray,  DEC  and 
CDC  systems. 


SR-0009 

SR-0011 

SR-0013 

SR-0018 

SV-0020 

SR-0035 

SR-0039 

SR-0060 

SR-0066 

SR-0113 


**  Cray  ** 

Fortran  (CFT)  Reference  Manual 

COS  Version  1  Reference  Manual 

UPDATE  Reference  Manual 

CFT77  Reference  Manual 

DEC  VAX/VMS  Station  Reference  Manual 

CDC  NOS  Station  Reference  Manual 

COS  Message  Manual 

Pascal  Reference  Manual 

SEGLDR  Reference  Manual 

Programmer's  Library  Reference  Manual 


**  DEC  ** 


AA-D034D-TE 

AA-Z200C-TE 

AA-Z300A-TE 

AI-Y517A-TE 


Programming  in  VAX  Fortran 
DCL  Dictionary 
EDT  Reference  Manual 
VAX/VMS  User's  Manual 


**  CDC  NOS  ** 

60460420  NOS  Full  Screen  Editor 

60459680  NOS  2  Reference  Set  Volume  3:  System  Commands 


**  General  ** 

CMLD~87-07  Fortran  77  Extensions  ~  A  Comparison 
CMLD-88/14  Computer  Center  Reference  Manual 
(this  manual) 

CMLD-88/15  CDC  NOS  Full  Screen  Editor  (FSE)  User's  Guide 
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*****  Appendix  G  ***** 

***  CCF  Computer  Systems  *** 


Cray 


Cl 


Computer: 
Front  ends 
Links  to: 
Operating 
Services: 
Schedule: 

Location: 


Cray  X-KP/24 

:  DEC  VAXcluster  (V3) ,  CDC  CYBER  180/860A  (Nl) 

Mass  Storage  Systea  (Ml) 
systea:  COS  level  1.16 

batch,  timesharing 

24  hours  a  day,  7  days  a  week,  except  a  few  hours 
Tuesday  and  Thursday  mornings  for  maintenance 
Central  site 
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DEC  VAXc luster 


DTI  (VI) 

Computer:  VAX  11/780 

Links  to:  CDC  CYBER  180/860A  (Nl/MFN) ;  DECnet  to  DTRC/ 

Annapolis  (RM1) ,  NAVAIR  (HORNET),  NAVSEA  (SEAHUB, 
etc.);  DDN-TELNET  (TOFACS,  etc.) 

Operating  system:  VMS  4.6 
Services:  batch,  timesharing 

Schedule:  24  hours  a  day,  7  days  a  week,  except  a  few  hours 

Thursday  morning  for  maintenance 
Location:  Central  site 


DT2  (V2) 

Computer:  VAX  11/780 

Links  to:  CDC  CYBER  180/860A  (Nl/KFN) ,  DECnet  to  DTRC/ 

Annapolis  (RMl) ,  NAVAIR  (HORNET),  NAVSEA  (SEAHUB, 
etc.) 

Operating  system:  VMS  4.6 
Services:  batch,  timesharing 

Schedule:  24  hours  a  day,  7  days  a  week,  except  a  few  hours 

Thursday  morning  for  maintenance 
Location:  Central  site 


DT3  (V3) 

Computer:  VAX  8550 

Links  to:  Cray  X-MP  (Cl);  CDC  CYBER  180/860A  (Nl/MFN); 

DECnet  to  DTRC/Annapolis  (RMl),  NAVAIR  (HORNET), 
NAVSEA  (SEAHUB,  etc.) 

Operating  system:  VMS  4.6 
Services:  batch,  timesharing 

Schedule:  24  hours  a  day,  7  days  a  week,  except  a  few  hours 

Thursday  morning  for  maintenance 
Location:  Central  site 


DT4  (V4) 

Computer:  VAX  8550 

Links  to:  CDC  CYBER  180/860A  (Nl/MFN);  DECnet  to  DTRC/ 

Annapolis  (RMl),  NAVAIR  (HORNET),  NAVSEA  (SEAHUB, 
etc.) 

Operating  system:  VMS  4.6 
Services:  batch,  timesharing 

Schedule:  24  hours  a  day,  7  days  a  week,  except  a  few  hours 

Thursday  morning  for  maintenance 
Location:  Central  site 


STEW'S*  ? 
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X 


c 


Remote  Mini-sites 
RM1  (Rl) 

Computer:  VAX  8250 

Links  to:  DECnet  to  VAXclustetr  (DT1-DT4) ,  NAVAIR  (HORNET) , 

NAVSEA  (SEAHUB,  etc.) 

Operating  system:  VMS  5.0 

Services:  RJE  terminal  with  local  batch,  timesharing 

Schedule:  24  hours  a  day,  7  days  a  week,  except  a  few  hours 

for  suintenance 
Location:  Annapolis 


Control  Data  Corporation 
MFN  (Nl) 

Computer:  CDC  CYBER  180/860A  with  Mass  Storage  System 

Cray  Station  ID:  Nl 

Links  to:  Cray  X-MP  (Cl) 

Links  from:  Cray  X-MP  (Cl) ,  DEC  VAXcluster 

Operating  system:  NOS  version  2.5.3  level  688 

Services:  trillion-bit  storage,  local  and  remote  batch, 

timesharing 

Schedule:  24  hours  a  day,  7  days  a  week,  except  a  few  hours 

for  maintenance 

Location:  Central  site 


Page  G-4 


RevO 


88/10/01 


Office  Automation  System  composed  of: 


TOFACSA 

Computer:  DEC  VAX  11/780 

Links  to:  Hass  Storage  System 

Operating  system:  Ultrix-32 

Services:  TOFACS  Office  Automation  (primarily  Carderock) 

Schedule:  24  hours  a  day,  7  days  a  week,  except  a  few  hours 

Thursday  morning  for  maintenance 
Location:  Central  site 


DTRC 

Computer:  DEC  VAX  11/780 

Links  to:  Hass  Storage  System 

Operating  system:  Ultrix-32 

Services:  TOFACS  Office  Automation  (primarily  Carderock) 

Schedule:  24  hours  a  day,  7  days  a  week,  except  a  few  hours 

Thursday  morning  for  maintenance 
Location:  Central  site 


TOFACSC 

Computer:  DEC  VAX  11/780 

Links  to:  Hass  Storage  System 

Operating  system:  Ultrix-32 

Services:  TOFACS  Office  Automation  (primarily  Annapolis) 

Schedule:  24  hours  a  day,  7  days  a  week,  except  a  few  hours 

Thursday  morning  for  maintenance 
Central  site 


Location 
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***  Services  and  Support 
Accounting  for  Computer  Services:  Code  189.3 
Hardware:  Code  1895 

Information,  Computer  status  (recorded  message) : 
Manuals:  Software  Branch  (User  Services) 

Tape  Librarian:  Hardware  Branch 
Training:  Software  Branch  (User  Services) 

User  Services  (See  below) 


(202)  227-1910 
(202)  227-1400 
(202)  227-3043 
(202)  227-1907 
(202)  227-1967 
(202)  227-1907 


Software  Branch  (User  Services) 

Carderock:  Code  1893.1  (202)  227-1907 

Autovon:  8-287-1907 

Stan  Hi liner  (Head) 

Kevin  Brady 
Sharon  Good 
Brenda  Peters 


Annapolis:  Code  1893.1 
Dave  Sommer 


(301)  267-3343 
Autovon:  8-281-3343 


Administrative  Personnel 

Head,  Computation,  Mathematics  and  Logistics  Department: 

Dr.  Charles  Schoman,  Code  18  (202)  227-1504 

Head,  Computer  Facilities  Division: 

Gil  Gray,  Code  189  (202)  227-1270 

Head,  Computer  Accounting: 

Jean  Morris,  Code  189.3  (202)  227-1361 

Head,  Software  Branch: 

Lorraine  Minor,  Code  1893  (202)  227-1428 


Head,  Hardware  Branch: 

Albert  Glover,  Acting  Code  1895 


(202)  227-1346 
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*****  Appendix  H  ***** 


***  Internal  Data  Structure  *** 


1.  The  following  table  summarizes  word  lengths  on  various  computers: 


computer 

op  sys 

bits/word 

digits/word 

characters/word 

Cray  X-MP 

64 

22  octal 

8 

CDC  CYBER  200 
CDC  CYBER  180 

NOS/VE 

64 

16  hex 

8 

CDC  CYBER  180 

NOS  & 
NOS/BE 

60 

20  octal 

10 

CDC  CYBER  170 

NOS/BE 

DEC  VAX 

16 

4  hex 

2 

(when  used  in 

Fortran) 

32 

8  hex 

4 

IBM 

32 

8  hex 

4 

Burroughs  7700 

48 

12  hex 

6 

Unisys  1100 

36 

12  octal 

4  (ASCII) 

6  (Fieldata) 


This  affects  the  conversion  of  programs  in  four  areas: 

a.  The  degree  of  precision  of  operations  is  different.  Therefore, 
convergence  factors  may  need  to  be  increased  or  decreased  in 
absolute  value. 

b.  Constants  and  data  may  need  to  be  changed. 

c.  Octal  and  hexadecimal  constants  used  in  masking  operations  are 
generally  affected  and  require  alteration  according  to  their 
intended  use. 

d.  Since  different  computers  may  store  a  different  number  of 
characters  per  word,  DATA  statements  that  store  a  string  of 
Hollerith  characters  may  position  the  characters  in  different 
relative  positions  in  different  words.  All  variable  formats 
(whether  read  in  as  data  or  created  by  the  programmer)  should  be 
checked.  Better  yet,  Fortran  programs  which  store  Hollerith 
data  in  INTEGER  or  REAL  variables  should  be  changed  to  use  the 
Fortran  77  CHARACTER  variables  and  never  need  to  worry  about 
this  problem  again.  (You  My  have  to  worry  about  the  maximum 
length  of  a  CHARACTER  variable,  but  not  how  it  is  stored.) 
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2.  Internal  representation  of  character  data  is  ASCII  in  the  Cray  X-KP 
and  DEC  VAX,  Display  Code  in  the  CDC  CYBER,  and  ASCII,  EBCDIC  or 
internal  BCD  in  some  other  systems. 


CHARACTER  string 

machine 

op  sys 

internal  representation 

'  '  (1  blank) 

Cray  X-MP 

k 

oct  20  hex 

CDC  170 

55 

CDC  180 

NOS 

55 

DEC  VAX 

20 

’O'  (  1  zero) 

Cray  X-MP 

* 

oct  30  hex 

CDC  170 

33 

CDC  180 

NOS 

33 

DEC  VAX 

30 

'FILE48' 

Cray  X-MP 

k 

oct  46494C463438  hex 

CDC  170 

061014053743 

CDC  180 

NOS 

061014053743 

DEC  VAX 

3834454C4946 
(  8  4  E  L  I  F  ) 

-  the  octal  representation  depends  on  the  position  in  the  word 


Hollerith  words 

machine 

op  sys 

internal  machine  representation 

<blanks> 

Cray  X-MP 

020040 1 0020040 1 0020040 

oct 

2020202020202020 

hex 

CDC  170 

55555555555555555555 

oct 

CDC  180 

NOS 

55555555555555555555 

oct 

DEC  VAX 

20202020 

hex 

<zeroes> 

Cray  X-MP 

0300601403006014030060 

oct 

3030303030303030 

hex 

CDC  170 

33333333333333333333 

oct 

CDC  180 

NOS 

33333333333333333333 

oct 

DEC  VAX 

30303030 

hex 

FILE48 

Cray  X-MP 

0431112304246416020040 

oct 

46494C4534382020 

hex 

CDC  170 

06101405374355555555 

oct 

CDC  180 

NOS 

06101405374355555555 

oct 

DEC  VAX 

45 4C 4946  20203834 

hex 

(  E  L  I  F  8  4)  <— 

-  2  words 

3.  The  character  sequence  for  the  Cray  X-MP  and  DEC  VAXcluster  is 
ASCII.  Note  that  numbers  precede  letters  for  alphabetic 
comparisons.  The  character  sequences  for  the  CDC  computers  at  DTRC 
are  Display  Code  (NOS:  64-character  set;  NOS/BE:  63-character  set). 
CDC  Fortran  uses  the  Display  Code  sequence  (letters  before 
numbers);  CDC  COBOL  uses  the  A5CII6  sequence  (numbers  before 
letters).  DEC  VAX  uses  the  ASCII  sequence. 
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4.  The  CDC  CYBER  uses  some  special  bit  configurations  in  floating 
point  arithmetic  to  indicate  indefinite  and  infinite  operands. 
These  errors  could  be  caused  by  referencing  program  areas  not 
initialized  or  areas  overwritten  due  to  inadequate  storage 
reservation.  The  CPU  will  not  do  any  further  calculation  if  it 
encounters  such  a  number  and  the  job  will  abort  with  an  error  mode 
2  or  4. 


+  infinity  3777xxxxxxxxxxxxxxxx  oct 

-  infinity  4000xxxxxxxxxxxxxxxx 
+  indefinite  1777xxxxxxxxxxxxxxxx 

-  indefinite  6000xxxxxxxxxxxxxxxx 

where  'x'  is  any  octal  digit,  usually  0. 


5.  The  word  format  of  integers  and  floating  point  numbers  differs  on 
the  various  computers. 


Cray  X-MP 

1,  1.0 

-1,  -1.0 

2,  2.0 

4,  4.0 


integer 

0000000000000000000001 

0000000000000001 

1777777777777777777777 

FFFFFFFFFFFFFFFF 

0000000000000000000002 

0000000000000002 

0000000000000000000004 

0000000000000004 


floating  point 
0400014000000000000000  oct 
4018000000000000  hex 

1400014000000000000000  oct 
COO 1800000000000  hex 

0400024000000000000000  oct 
4002800000000000  hex 

0400044000000000000000  oct 
4003800000000000  hex 


DEC  VAX 

1,  1.0  00000001 

-1,  -1.0  FFFFFFFF 

2,  2.0  00000002 

4,  4.0  00000004 


00004080  hex 

0000C080 

00004100 

00004180 


CDC  CYBER 

1,  1.0 
-1,  -1.0 
2,  2.0 
4,  4.0 


0000000000  0000000001 
7777777777  7777777776 
0000000000  0000000002 
0000000000  0000000004 


1720400000  0000000000  oct 
6057377777  7777777777 
1721400000  0000000000 
1722400000  0000000000 


Note  the  difference  in  the  format  of  negative  integers  (and  CYBER 
floating  point)  numbers: 

Cray  X-MP,  DEC  VAX  CDC  CYBER 


two's  complement 
of  absolute  value 


one's  complement 
of  absolute  value 
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6.  Logical  variables  are  represented  by: 

Cray  X-MP,  CDC  CYBER  DEC  VAX 

TRUE  -1  1  in  bit  0 

FALSE  0  0  in  bit  0 


7.  By  default,  your  program  area  in  central  memory  is  set  as  follows: 


Cray  DEC  VAX 


zero  zero 

addresses  and  some  bits  set  for 
CYBER  Interactive  Debug) 

See  LDSET , PRESET/PRESETA. 


CDC  NOS  CDC  NOS/BE 

zero  DEBUG  (negative  indefinite  with 
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***  Internal  Represent at  ion  *** 


**  Cray  X-MP  ** 

Words  in  the  Cray  X-MP  are  64  bits  long.  Bits  are  numbered  0— 63 
or  63-0. 


Integer:  bit  0  -  the  sign  bit  (0  -  positive;  1  —  negative)  (23) 


bits  1:23  -  the  absolute  value  of  the  integer  (22:0) 

range  - 10**14  to  -10**14 

Integer  (CFT, INTEGER-64) : 

bit  0  ~  the  sign  bit  (0  -  positive;  1  -  negative)  (63) 

bits  1:63  -  the  absolute  value  of  the  integer  (62:0) 

range  -  ~  -10**19  to  -10**19 

Real:  bit  0  -  the  sign  of  the  number  (63) 

bits  1:15  -  the  exponent  (2000  bias)  (62:48) 

bits  16:63  -  the  mantissa  (47:0) 

range  - 10**-2466  to  -10**2465 

precision  -  14  decimal  digits 


Double:  First  word: 

bit  0  -  the  sign  of  the  number  (63) 

bits  1:15  -  the  exponent  (2000  bias)  (62:48) 

bits  16:63  -  the  high  order  part  of  the  mantissa  (47:0) 

Second  word: 

bits  0:15  -  unused  (63:48) 

bits  16:63  -  the  low  order  part  of  the  mantissa  (47:0) 

range  -  -10**-8193  to  -10**8189 
precision  -  -  29  decimal  digits 
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**  DEC  VAX  ** 


Byte*  in  the  DEC  VAX  are  8  bits  long  with  bits  are  numbered  7-0.  A 
word  (INTEGER*2  in  Fortran)  is  16  bits  long  (15-0).  A  longword 
(INTEGER  or  INTEGER**)  is  32  bits  long  (31-0). 


Word  (INTEGER *2) : 

bit  15  -  the  sign  bit  (0  *  positive;  1  “  negative) 

bits  14:0  -  the  absolute  value  of  the  integer 

range  -  -32,768  to  32,767 

Longword  (INTEGER*4) : 
bit  31 
bits  30:0 
range 

F_f loat  (REAL*4) : 

bit  15  -  the  sign  of  the  number 

bits  14:7  -  the  exponent  (excess  128) 

bits  6:0  and 

31:16  -  the  mantissa 

range  -  -.29*10**-8  to  -1.7*10**38 

precision  -  ~  7  decimal  digits 


-  the  sign  bit  (0  -  positive;  1  “  negative) 

-  the  absolute  value  of  the  integer 

-  -2,147,483,648  to  2,147,483,647 


D_f loat  (REAL*8,  DOUBLE  PRECISION) : 

bit  15  -  the  sign  of  the  number 

bits  14:7  -  the  exponent  (excess  128) 

bits  6:0  and 
63:48  and 
47:32  and 

31:16  -  the  mantissa 

range  -  ~.29*10**-8  to  -1.7*10**38 

precision  -  -  16  decimal  digits 


G_f loat  (FORTRAN/G_f loating) : 

bit  15  -  the  sign  of  the  number 

bits  14:4  -  the  exponent  (excess  1024) 

bits  3:0  and 

63:16  -  the  mantissa 

range  -  -,56*10**-308  to  ~. 9*10**308 

precision  -  -  15  decimal  digits 


H_f loat  (REAL*16) : 

bit  15 
bits  14:0 
bits  127:16 
range 
precision 


the  sign  of  the  number 
the  exponent  (excess  16,384) 

the  mantissa 

~.84*10**-4932  to  -.59*10**4932 
-  33  decimal  digits 
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**  CDC  CYBER  (NOS,  NOS/BE)  ** 


Words  in  the  CDC  CYBER 


NOS/BE) 

are  60 

bits 

long. 

Integer: 

bit 

59 

-  the 

bits 

58:0 

-  the 

Integer: 

bit 

59 

-  the 

bits 

47:0 

-  the 
(if 

Real: 

bit 

59 

-  the 

bits 

58:48 

-  the 

bits 

47:0 

-  the 

170  and  CYBER  180  (when  running  NOS  or 
Bits  are  numbered  59-0. 

sign  bit  (0  "  positive;  1  “  negative) 
absolute  value  of  the  integer 

sign  bit  (0  *  positive;  1  “  negative) 
absolute  value  of  the  integer 
used  in  multiplication  or  division) 

sign  of  the  number 
exponent  (2000  bias) 

mantissa  with  the  binary  point  after  bit 


0 


Double:  (Double  precision  is  performed  in  the  software,  not  in  the 

hardware) 

First  word: 

bit  59  -  the  sign  of  the  number 

bits  58:48  -  the  exponent  (2000  bias) 

bits  47:0  -  the  high  order  part  of  the  mantissa  with  the 

binary  point  after  bit  0 

Second  word: 

bit  59  -  the  sign  of  the  number 

bits  58:48  -  the  exponent  (2000  bias) 

bits  47:0  -  the  low  order  part  of  the  mantissa  with  the 

binary  point  after  bit  0 
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*****  Glossary  ***** 

Alphabetic  (CDC  -  NOS  and  NOS/BE) 

The  letters  A-Z. 

Alphabetic  (Cray) 

$,  1,  9,  and  the  letters  A-Z,  a-z. 

Alphabetic  (DEC) 

$,  _  (underscore),  and  the  letters  A-Z,  a~z  (upper  and 
lower  case  are  the  sane) . 


Alphanumeric 

Alphabetic  and  the  digits  0-9. 

User  initials  (userid  or  usernane) 

The  4-character  ID  assigned  to  each  user  by  Code  189.3. 
This  is  used  to  identify  jobs,  for  charge  authorization, 
to  identify  permanent  and  MSS  files,  magnetic  tapes,  etc. 
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Note  -  Command*,  qualifiers  and  directives  are  in  upper  case. 

Major  references  are  flagged  with  an  asterisk  after  the  page 


nuaber,  for  example,  1-1* 


*  (coament) 

I  (consent) 

!  (prompt) 

$  (create  VMS  subprocess) 
$  (subprocess) 

+  (display  next) 

+  (next  page) 

-  (display  previous) 

-  (last  page) 

8  (execute  command  file) 

8  (invoke  procedure) 


lA 

ABAQUS 

ABBREV 

Abort 


ABORT 

ABORT  (ICF) 
ABS 

Absolute 


ABTCODE 

Access 

ACCESS 


Access  mode 
ACCOUNT 


2-2-1,  5-3-4*.  B-5,  D-4*,  D-125*, 
E-2 

C-l,  E-2 
2-1-10 

2-1-11 

C-8 

C-8 

2-1-11 

C-9 

2-1-11 

2-1-11,  C-9,  E-l 
C-l 


E-9 

1- 3-1 
5-4-3 

2- 3-3,  2-6-3,  B-3,  B-31,  B-32,  D-3, 
D-16,  D-121 

2-1-11,  2-1-15,  2-6-2,  C-9*,  E-4, 

E-5 

D-121* 

2-6-3 

2-6-1*,  2-6-3,  5-5-1,  5-6-1,  H-l, 

H-3 

2-2-6 

1- 2-2,  2-1-1,  3-1-4,  4-1-1*,  B-39, 
B-45,  D-81 

2- 1-1,  2-1-9,  2-2-2,  3-1-4,  5-2-3, 

B-5*,  B-6,  D-5*,  D-33,  D-117,  E-l, 
E-4 

B-3,  D-2* 

1-2-2,  2-1-3,  2-1-10,  2-1-14,  2-2-1, 
B-5*,  E-2,  E-9 
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Account  number 

Account  number  change 
Accounting 

ACCRPT 

ACQUIRE 

B-7,  D-17 

B-42 

D-95,  G-5 

E-l 

2-2-2,  3-1-3*,  B-6*,  E-l 

ACSL 

ADD 

ADDFILE 

ADJUST 

Adminietrative  pereonnel 

1- 3-1 

5-5-2 

5-4-2 

2- 2-2,  B-7* 

G-5 

ADP  Control  Center 

ADPCOST 

ALGOL 

ALIGN 

ALLOCATE 

1-2-1*,  1-2-3 

E-l 

1- 3-1 

2- 6-3 

6-1-4,  C-2* 

Alphabetic 

Alphanumeric 

ALTACN 

ALTER 

Ampersand 

Gl-1 

D-108,  Gl-1 

2-2-1,  B-7* 

E-l 

2-3-3 

Annapolis 

ANSI  standard  label 

APL 

Apostrophe 

APPEND 

1-2-1,  4-1-1,  6-1-4,  G-2,  G-5 

6-1-1 

1- 3-1 

2- 3-3,  B-4* 

5-2-6,  D-6*.  E-4 

Application 

Application,  NAM 

APPLLIB 

APPSW 

APT 

D-14,  D-55,  D-71 

D-6 

5-7-1 

2-1-15,  2-1-16,  5-2-4,  D-6* 

1-3-1 

Arithmetic  operator 

ARPA 

Arrow 

ASCII 

2-2-7 

4- 1-5 

5- 1-5 

2-2-7,  5-2-3,  6-1-1,  A-l*,  A~2*, 
A-3*,  A-4*.  D-7*,  D-90,  H~2 

ASSETS 

Assign 

ASSIGN 

E-l 

D-8 

2-2-2,  4-1-3,  5-2-5,  5-2-6,  5-2-7, 
B-7*,  B-ll,  D-7*,  E-2,  E-3,  E-4 

Asterisk 

2-6-2 

At  sign 

ATTACH 

ATTENTION 

ATTENTION  (ICF) 

C-l 

5-2-6,  5-7-1,  C-9*,  D-8*,  D-53,  E-l, 
E-4,  E-6 

2-1-11,  2-1-15,  C-10* 

D-121* 
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BUILD 

E-4 

Bulletin 

4-1-2 

BYE 

2-1-11,  2-1-15,  5-2-4 
E-6 

BYE  (ICF) 

D-121* 

C 

1-3-1 

Cache  memory 

5-1-1 

CALCFN 

5-7-2 

Cal comp 

1-3-1 

Cal  comp  plot 

1-2-3 

CALC936 

5-7-2 

CALL 

2-2-1, 

2-2-4,  2-3-1, 

5-4-2, 

5-4-5,  B-14*, 

Call  by  name 

2-2-4, 

2-2-5,  2-3-1, 

Cancel 

D-4 

Capsule 

5-6-2 

Carat 

B-4* 

Card  interpreter 

1-2-3 

Carderock 

1-2-1, 

3-1-2,  G-5 

Carriage  control,  Fortran 

C-21 

CASE 

2-6-3 

Case,  upper 

2-4-1 

CATALOG 

5-2-8, 

D-14*,  E-2,  E- 

Category  type 

D-2* 

CATLIST 

5-2-6, 

D-15*,  E-l,  E- 

Caution 

2-6-1 

Caution,  segmentation 

2-6-13 

CC  (Proc) 

5-3-1* 

CCF 

4-2-1 

CDC 

F-l,  G-3,  Gl-1 

CDC  CYBER  860 

1-3-1, 

5-1-1* 

CDCnet 

1-1-2, 

1-1-4,  5-1-1, 

cm 

1-3-1 

CDROP 

D-16* 

Central  processing  unit 

2-1-1, 

5-1-1 

Central  Site 

1-2-1*, 

G-4 

,  1-2-3,  2-1-8, 

Central  Site  operator 

4-1-2 

Certify  tape 

6-1-2 

CFT 

2-2-4, 

B-15*,  E-5,  F- 

,  C-10*,  D-14*, 


2-3-4,  2-4-2, 
E-l 

B-15,  D-75 


5 

6 


5-1-2 

G-l,  G-2,  G-3, 

1 


CFT77 

CHANG 

Change 


2-2-4,  B-20*,  E-5 
5-4-2 

B-39,  B-50,  D-16,  D-28,  D-81,  D-108 
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Change 

CHANGE 

Change  access  password 

CHARACTER 

Character  conversion 


D-124 

3-1-1,  3-1-2,  5-2-7,  D-16*,  E-6,  E-7 
1-2-2 
H-l,  H-2 
2-6-3 


Character,  inhibit 
Character,  aaster 
Character,  prefix 
Character  set 
Character  set,  ASCII 


5-3-2 

2-4-1,  5-4-1 
D-124 

D-28,  D-40 
A-l 


Character  set,  CDC 
Characteristic 
Characteristic,  dataset 
Characteristic,  disposition 

Charge 

CHARGE 

CHARGES 

Checkpoint 

Christensen  protocol 
CINT 

CJOB 

CHILL 

CKP 

Class,  job 
Class,  service 

Clean  Magnetic  tape 
CLEAR 

Clear  screen 
Clock 

CMS 
Cobol 
COBOL 
Cobol  68 
Cobol  74 

C0B0L5 

Code,  disposition 

Coded 

COLLECT 

Colon 

.COM 

Combine 

COMBINE 

COMDECK 

Coaaand 


A- 3 

B-7,  B-48,  D-16,  D-108 

B-39 

B-26 

1- 2-1,  3-1-1,  3-1-2,  5-1-6 

5-1-2,  5-2-1,  D-17*,  E-2 

2- 2-1,  B-21* 

5-2-7,  D-6,  D-19,  D-88 
D-120 

2-1-11,  C-8*,  E-6 

D-18* 

D-18* 

5-2-7,  D-19*,  E-2 

2-1-4 

2-1-4 

1- 2-3,  6-1-2 

2- 1-11,  5-2-5,  C-ll*,  D-19*,  D-88, 
E-2,  E-7 

5-3-2 

D-91 

1-3-1,  E-9 

1- 3-1,  7-1-1,  D-19,  H-2 
E-2 

7-1-1 

7-1-1 

5- 2-8,  D-19*,  E-2 

2- 1-1 

6- 1-1,  D-23 
2-1-11,  C-ll* 

A-3,  A-4* 

4-3-1 

D-80 

E-2 

2-4-1,  5-4-1,  5-4-5 

B-l*,  C-l*,  D-l*,  D-4,  D-38,  D-119 
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Coaonand  comparison 
Command  file 
Command,  station 
Comment 


COMMENT 

Common 

Common  block 
COMMONS 

COMPAR 

Compare 

COMPARE 

Comparison,  command 
Comparison,  string 

Compile 

COMPILE 
Complaints 
Complement,  one's 

Complement ,  two ' s 
Completion  code 
Complex  procedure 
Compress  a  library 
Computer  Center 


E-l 

C-U,  C-12,  C-17,  C-18,  D-124 
C-7 

2-4-3,  2-6-1,  2-6-2,  5-2-1*,  5-3-4, 
5-4-4,  B-5,  C-l,  D-4,  D-77,  D-125 

2-1-11,  5-2-1,  5-5-2,  C-ll*,  D-20*, 
E-2 

2-6-6,  5-6-5 

2-6-3,  2-6-4,  2-6-8,  2-6-13,  5-6-6 
2-6-4,  2-6-8,  2-6-12 


E-2 

D-115 

2-2-3,  B-21*,  E-2 
E-l 
2-2-6 

2-4-2,  5-4-2,  B-15,  B-20,  B~44,  D-8, 

D-19,  D-49,  D-119 

2-4-3,  5-4-2,  5-4-6 

1-2-3 

H-3 


H-3 

2-2-7 

2-3-1,  2-3-4 
4-2-4,  4-4-2,  4-5-3 
1-2-1*,  3-1-1,  3-1-2,  4-2-1 


Computer  Center  Notes  1-2-1 

Computer  service  G-5 

Computer  status  G-5 

Computer  system  G-l 

Concatenate  5-3-1 


Conditional 
CONNECT 
CONNECT  (ICF) 

Constant 
Context,  Cray 

Continuation 

Control  Data  Corporation 
Control  statement 
Control  word 
CONTROL  Z 


5-3-2,  B-34,  D~ 57 
2-1-15,  E-2 
D-121* 

H-l 

C-7*,  C-8,  C-14 

2-2-7,  2-6-2,  5-6-6,  B-4* 
5-1-1*,  G-3 

2-1-3*,  2-3-1,  4-3-1,  5-3-1 

B-3 

C-12* 


Convergence  factor 
Conversion 

Conversion,  character 

Convert 

Copy 


H-l 

7-1-1*,  H-l 
2-6-3 

B-ll,  B-55,  C-5,  D-21,  D-40 
C-23,  D-22,  D-23,  D-24,  D-26,  D-27, 
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Copy 

D-106 

COPY 

2-4-2,  2-4-3,  2-6-9,  5-2-5,  5-4-2 
5-4-3,  5-5-2,  D-21*,  E-2 

Copy  coded 

D-92 

COPYBF 

5-2-5,  D-22*.  E-2 

COPYBFR 

E-2 

COPYBR 

5-2-5,  D-22*,  E-2 

COPYCF 

5-2-5,  D-23*,  E-2 

COPYCR 

5-2-5,  D-23*.  E-3 

COP  YD 

2-2-3,  B-22*,  E-2,  E-3 

COP  YE 

E-3 

COPYEI 

5-2-5,  D-24*,  E-2,  E-3 

COPYEXT 

E-3 

COPYF 

2-2-3,  B-22*.  E-2 

COPYL 

5-2-8,  D-25*,  E-3 

COPYLM 

5-2-8,  D-26*,  E-3 

COPYN 

E-3 

COPYR 

2-2-3,  B-23*.  E-3 

COPYRM 

E-3 

COPYS 

E-3 

COPYSBF 

5-2-5,  D-26*,  E-3 

COPYSF 

E-3 

COPYSR 

E-3 

COP  YU 

2-2-3,  B-23* 

COPYX 

5-2-5,  D~27* 

Core  iaage 

5-6-1 

CORRECT  (Proc) 

5-3-1* 

COS 

2-1-1*,  4-2-1,  F-l 

COS  input  queue 

2-1-9 

COS  level 

2-2-6 

Counter 

2-2-6 

.CPR 

2-1-5 

CPU 

2-1-1,  4-1-1,  5-1-1 

CPYEXT 

E-3 

Cray 

1-3-1,  3-1-3,  4-1-1,  4-2-1,  D- 16 

D-18,  D-28,  D-29,  D-30,  P-1,  G-l, 
Gl-1 


CRAY 

Cray 

context 

2-1-11,  2-1-14,  4-2-1,  C-7* 
2-1-10,  C-7*,  C-8,  C-14 

CRAY 

INTER 

E-6 

CRAY 

INTERACTIVE 

2-1-1,  2-1-2,  2-1-10,  2-1-14 

Cray 

Station 

2-1-10*,  2-1-11 

Cray 

station  ID 

1-1-2*,  1-1-3 

CRAY 

SUBMIT 

2-1-1,  2-1-5 

Cray 

X-MP 

1-1-2,  2-1-1*,  H-5 
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Create 

Create  a  file 
Create  a  library 
CREC 

CRERUN 

Critical  file 

Cross-reference 

$CS 

CSET 

CSTATUS 

CSUBMIT 

CT 

CTASK 

ctD 

ctE 

CTIME 

CTRL-Z 

ctS 

ctl 

ct2 

Cursor 

CWEOF 

CYBER  control  language 
CYBER  170 

CYBER  180 
CYBER  750 
CYBER  860 

Cl 


ZD 

Data 

DATA 

DATA  (Proc) 

Dataset 


DATASET 

Dataset,  blocked 
Dataset  characteristic 
Dataset  definition 
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4- 2-3,  5-3-1,  5-4-5,  5-5-3,  B 
D-32,  D-66,  D-109,  D-110 
D-77 

2- 5-1,  4-4-1,  4-5-1 

5- 1-2 

D-28* 

3- 1-2 
B-32 

2-1-3*,  2-3-1 
5-2-3,  D-28* 

D-29* 

2-1-1,  2-1-8,  5-2-2,  D-29* 
D-2* 

D-30* 

D-5* 

D-5* 

5-2-2,  D-30* 

4- 2-6 
D-5* 

D-4* 

D-4* 

5- 1-5 

2-4-2,  5-4-2 

5-2-1 

H-7 

H-7 

1- 2-2,  7-1-1,  G-3 

2- 1-1,  2-1-8,  2-1-15,  3-1-7, 
7-1-1,  G-3 

1-1-2*,  G-l 


5-2-4,  D-5* 

H-l,  H-2 
2-3-2,  B-23* 

5-3-1*,  5-3-2 

2-1-1,  B-2,  B-ll,  B-21,  B-26 

B-33,  B-47,  B-48,  B-54,  B-55 
2-1-12,  C-12* 

B-22,  B-51,  B-58 
B-39 
2-2-2 
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■7, 


6-1-3, 


B-27, 


Dataset,  library 
Dataset,  local 
Dataset,  peraanent 


B-35 

2-1-1,  B-27 

2-1-1,  3-1-3,  B-25,  B-45,  C-12 
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Dataset,  unblocked  B-23, 

Datatrieve  1-3-1 

DATE  2-2-6 

DAY  E-3 

Dayfile  1-2-3 


B-52 

5-5-2 

5-3-2,  D-20,  D-30,  D-33,  D-91 


DAYFILE 

DBMS 

DC 

DCL 


D-10A 

5-2-2,  D-31*,  E-3 
1-3-1 

B-2*,  B-3* 

C-l*,  C-1A* 


DON 

DEALLOCATE 

Debug 

DEBUG 

DEC 


1-1-4, 

4-1-1*,  4-1-5*, 

6-1-4, 

C-2* 

2-6-7, 

B-50 

2-2-3, 

B-24* 

4-1-1* 

,  F-l,  Gl-1 

DEC  reaote  mini 

DEC  VAX 

DEC  VAXcluster 

DECalc 

Decimal 


1-1-3 

6-1-A,  H-6 

1-1-3,  4-1-1*.  G-2 

1-3-1 

H-5,  H-6,  H-7 


Deck 
DECK 
DECnet 
DECnet  node 
DECserver 


5-4-1 

2-4-1,  5-4-1,  5-4-5 
4-1-1,  4-1-5 
1-1-3 

1-1-3,  1-1-4,  4-1-1*,  4-1-2 


DEC_VT100 

Defense  Data  Network 
DEFER  job  class 
Define 
DEFINE 


Definition,  tensinal 
Degauss  magnetic  tape 
DELAY 
Delete 

DELETE 

Delimiter 

Demand 

Destroy 

DETAB 

Detach 

Diagram,  network 
DIAL 

Dial-up  lines 


5-1-2 

4-1-1,  4-1-5 

2- 1-4,  B-36 
C-21 

3- 1-2,  4-1-3,  4-2-6,  5-2-7,  D-32*, 


E-2,  E-4,  E-6,  E-7,  E-8 
D-107 

1- 2-3 

2- 1-12,  C-12* 

3- 1-6,  C-16,  C-19 

2-2-2,  2-2-3,  2-4-2,  5-4-2,  5-4-6, 
5-5-2,  B-25*,  E-3,  E-7 
2-2-7,  2-3-3 
1-1-1 
D-80 


C-3* 

D-5 

1-1-4 

5-2-4,  D-33*,  E-8 
1-1-2,  1-1-3 
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Differences 

D-116 

DIFFERENCES 

E-2 

Digit 

Gl-1 

Direct  file 

3-1-2,  3-1-4,  3-1-5,  5-1-6* 
D-32 

Directive 

5-6-6 

Directive,  BUILD 

2-5-1,  B-12 

Directive,  LIBEDIT 

5-5-1* 

Directive,  SEGLDR 

2-6-2* 

Directive,  segmentation 

2-6-8* 

Directive,  UPDATE 

2-4-1*,  5-4-1 

DIRECTORY 

4-1-3,  4-1-4,  E-l 

DISCARD 

2-1-12,  2-1-15,  C-14*,  E-3 

DISCARD  (ICF) 

D-122* 

DISCONT 

E-3 

DISMOUNT 

6-1-4,  C-2* 

Display 

5-1-3 

DISPLAY 

5-2-1,  D-33*.  E-3 

Display  code 

A-l,  A-2,  A-3,  A-4,  D-34,  H 

Display  region 

C-23 

Dispose 

B-41,  D-90 

DISPOSE 

2-1-8,  2-2-2,  3-1-3*,  B-26* 

Disposition 

B-2* 

Disposition  code 

2-1-1 

DISSPLA 

1-3-1,  5-7-2 

DMB 

5-2-7,  D-34* 

DMD 

5-2-7,  D-34*,  E-3 

DMP 

5-2-7,  D-35*,  E-3 

DOCGET 

E-l 

Document 

4-5-1 

Double  precision 

H-5,  H-6,  H-7 

DROP 

2-1-12,  5-2-2,  C-14*,  D-35* 
E-5 

DS 

B-27*,  E-5 

DSDUMP 

B-27*,  E-7 

DSMOUNT 

E-4 

DTLIB 

2-5-1,  4-2-1,  4-4-1,  4-5-1, 
5-7-1,  C-l 

DTLIBCRAY 

4-5-1 

DTRC 

2-2-1 

Dtrc  (TOFACS) 

G-4 

DTI 

1-1-3*,  1-3-1,  4-1-1*,  4— 1 — J 

DT100 

5-1-5,  D-93 

DT2 

1-1-3*,  1-3-1,  4-1-1*,  G-2 

DT3 

1-1-3*,  1-3-1,  4-1-1*,  G-2 
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ENDTREE 

2-6-9,  2-6-11,  2-6-12 

ENDW 

5-2-1,  D-37*,  E-4 

End-of-£ile 

2-1-3,  2-1-10,  5-3-2,  C-14,  D-122 

End-of-inf  ometion 

D-24,  D-98 

End-of-record 

5-3-2,  A-4 

ENQUIRE 

5-2-2,  D-37*,  D-64,  E-l,  E-5,  E~8 

ENTER 

5-2-2,  D-38* 

ENTER  (Proc) 

5-3-2* 

Entry  point 

2-6-4,  5-6-3,  D-39 

EOF 

2-1-3*,  2-1-12,  2-1-15,  2-4-6,  C- 

D-80,  D-92 

EOF  (ICF) 

D-122* 

EOF  (Proc) 

5-3-2* 

EOI 

E-4 

EOR 

D-80,  D-92 

EOR  (Proc) 

5-3-2* 

EP 

D-109 

EQUIV 

2-6-4 

Erase 

D-80 

ERRMSG 

5-2-2,  D-38*,  E-3 

Error 

2-6-1,  B-3,  B-38,  D-76 

Error  code  checking 

2-2-6 

ERRORS 

E-4 

Ethernet 

1-1-4 

ETL 

E-4 

Evaluate 

D-33 

EVE  (TPU) 

4-1-4,  E-4,  E-7 

EVICT 

D-39*,  E-4,  E-9 

EX  (Proc) 

5-3-2* 

Exchange  package 

D-34,  D-35 

Exclaaation  mark 

c-i 

Execute 

B-15,  C-18,  D-35,  D-64,  D-119 

EXECUTE 

5-2-3,  5-2-9,  5-6-3,  D-39*,  E-4 
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D-84 
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5-7-1 
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Exit 

C-12 
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EXITLOOP 
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External 

D-67 
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Fetch 

B-40 
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indirect 
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FILES 
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5-2-4,  D-54*,  E-6 

GPSS 
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1-3-1 
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2-6-7 
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5-3-3 
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2-6-4 
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INCLUDE 
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ISTATUS 


B-24 

1- 2-3 
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Job  control  language 
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J0-J7 
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LGO 

5-2-9,  5-6-3,  D-64*, 
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4-4-1,  G-l,  G-2,  G-3,  G-4 


88/06/20  RevO 

LIN-LOG  Page  Index- 

LINK 

4-4-3,  E-5,  E-6 
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Loader 

2-6-1*,  5-2-9,  5-6-1*,  B-49 
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2-1-3,  B-36 
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E-4,  E-8 

MFN 

1-1-2*,  G-3 

Microfiche 

C-6 

Mini-site 

1-1-1 

MLEVEL 

2-6-6 
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1-2-2,  3-1-1,  5-2-2,  D-81*,  E-6 

Password 

1-2-1,  1-2-2*,  2-1-2,  3-1-1,  3- 
4-1-1,  4-1-2,  5-1-2,  B-39,  D-3* 
D-81,  D-114 

Password,  login 

4-1-2 

Patran 

1-3-1 

PAUSE 

2-1-12,  5-2-2,  C-18*,  D-81*,  E- 

PCA 

1-3-2,  E-8 

PDHFC 

2-2-7 

PDMST 

2-2-6 

Percent 

A-4 

PERIOD 

2-1-15 

PERIOD  (ICF) 

D-124* 

Peripheral 

3-1-7 

Peripheral  processor 

5-1-1 

Permanent  dataset 

2-1-1,  3-1-3,  B-3,  B-4,  B-5,  B-l 
B-25,  B-45,  B-48,  C-12 

Peraanent  dataset  management 

2-2-2 

Peraanent  dataset  staging 

2-2-2 

Peraanent  file 

3-1-3,  3-1-7,  4-1-2,  5-1-1,  5-2 
D-8,  D-15,  D-16,  D-32,  D-53,  G1 

Peraission 

D-2* 

PERMIT 

2-2-2,  5-2-7,  B-45*,  D-81*,  E-6 

Personnel,  adainistrative 

G-5 

Pert  Time 

1-3-2 

PERT78 

5-7-1 

PHONE 

E-8 

PL 

2-4-1*.  5-4-1*,  5-4-5 

PL  (prograa  library) 

D-110 

PLAY 

2-1-12,  2-1-15,  C-18*,  D-122 

PLAY  (ICF) 

D-124* 

Plot 

1-2-3 

PLOTIO 

1-3-2 

PL/ 1 

1-3-2 

Position 

B-46,  B-48,  D-98,  D-99,  D-100 

Positional 

2-3-2,  2-3-3 

Positional  parameter 

2-3-3,  B-l*,  C-l,  D-l* 

Positive 

H-5,  H-6,  H-7 

PP 

5-1-1 
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PREFIX 

2-1-15 

Prefix  character 

D-124 

PREFIX  (ICF) 

D-124* 

Preset 

D~62,  D-95,  H-4 

PRESET 

2-6-6* 

Print 

2-1-1,  2-1-8,  D-26 

PRIMT 

2-2-3,  B-45*,  E-3,  E-8 

Printer 

5-1-1 

Priority 

2-1-4,  D-97 

PRNTSPY 

E-7 

PROC 

2-2-4,  2-3-1 

$PROC 

2-3-1* 

PROC 

2-3-2,  B-45* 

PROC  (Proc) 

5-3-3* 

Procedure 

2-2-4,  2-2-7,  2-3-1,  2-3-4, 

4-3-1* 

5-2-8,  5-3-1*,  5-3-1,  5-3-4*.  B-14 

B-23,  B-45,  B-48,  C-l,  D-9, 
D-68,  0-89 

D-38, 

Procedure  header 

5-3-3 

PROCFIL 

5-3-4,  5-7-1 

PROCLIB 

2-3-3,  3-1-4,  B-5 

Prograa 

0-67 

Prograa  library 

2-2-4,  2-4-1,  5-4-1,  B-10, 
D-110 

B-55, 

Proj  Mgt 

1-3-2 

Prologue 

0-114 

Prompt 

5-3-1,  5-3-2,  5-3-3 

PROMPT  (Proc) 

5-3-4* 

Prompt  (!) 

2-1-10 

Prototype 

2-3-1,  2-3-4,  B-45 

PRU 

5-1-6* 

PRUDMP 

E-7 

Punch 

A- 4 

PURDECK 

5-4-2 

PUR GALL 

5-2-7,  0-81*,  E-7 

Purge 

3-1-1,  B-40,  D-81,  D-82 

PURGE 

2-4-4,  4-1-4,  5-2-7,  5-4-3, 
E-3,  E-4,  E-5,  E-6,  E~7 

0-82*, 

PURGEDK 

2-4-4 

Q 

E-7 

QGET 

2-1-8,  5-2-2,  D-83*,  E-l 

Quad  precision 

H-6 

QUERY 

2-2-3,  B-46* 

Queue 

C-16,  C-19,  C-20,  C-22, 
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Queue 

D-35,  D-79,  D-83 

Queue,  input 

D-104 

QUIT 

2-1-10,  2-1-12,  2-1-15,  C-18*,  E-6 

QUIT  (ICF) 

D-125* 

RATFOR 

E-7 

RBF 

5-1-1 

Read 

H-7 

READ 

2-4-3,  5-4-3 

Real 

H-5,  H-6 

REAL*16 

H-6 

REAL*4 

H-6 

REAL*8 

H-6 

Real-tine 

D-91 

Recall 

D-84 

RECLAIM 

E-4,  E-6 

Record 

D-22,  D-23,  D-100,  D-119 

RECORD 

2-1-13,  C-19* 

Record,  blocked 

B-23,  B-51 

Record  identifier 

5-5-1 

Record  inforaation 

D-57 

Record  Manager 

5-6-6 

Recorded  aessage 

G-5 

Recover 

3-1-1 

RECOVER 

5-2-4,  D-84* 

REDO 

5-2-5,  D-84* 

REDUCE 

5-2-9,  5-6-3,  D-85*,  E-7 

Reference 

F-l 

Reformat 

D-71 

Refresh 

C-ll,  C-21 

Refund  request 

1-2-3 

Register 

2-2-7,  5-1-1,  D-94 

Registration 

1-2-1* 

Relational  operator 

2-2-7 

Release 

B-33,  D-39,  D-88,  D-110 

RELEASE 

2-1-13,  2-2-2,  B-47*,  C-19*,  E-7 

Relocatable 

2-6-8,  5-5-1,  5-6-6 

Relocatable  aodule 

2-6-3 

Reaote  Batch  Facility 

5-1-1 

Reaote  batch  cerainal 

2-1-8 

Reaote  aini-site 

G-2 

Reaote  output  queue 

2-1-8 

Reaote  terainal 

5-1-1 

Reaove 

B-25,  D-80 

REMOVE 

2-1-13,  C-19* 
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RENAME 

5-2-5,  5-5-4,  D-85*,  E-l,  E-7 

Replace 

5-5-3,  D-25,  D-26 

REPLACE 

5-2-7,  5-5-4,  D-85*,  E-l,  E-2 

Repreaentation,  internal 

H-2 

Reprieve 

C-10,  C-14 

REQUEST 

5-2-6,  5-2-7,  D-6*,  E-5,  E-7 

RERUN 

2-1-13,  2-2-1,  5-2-2,  B-47*,  C-20*. 

• 

D-87* 

RESOURC 

5-2-2,  6-1-3,  D-87*,  E-5 

Rea our ee,  job 

B-21,  D-58 

Restart 

5-2-7,  C-17 

RESTART 

5-2-7,  D-88*,  E-7 

RESTORE 

2-4-2,  5-4-3 

Resuae 

D-39 

RESUME 

2-1-16,  E-7 

RESUME  (ICF) 

D-125* 

RETAIN 

E-7 

Return 

B-47,  D-19,  D-89,  D-110 

RETURN 

2-2-1,  2-2-4,  2-3-1,  5-2-6,  B-48*, 
D-88*,  E-2,  E-7 

REVERT 

5-2-1,  5-2-8,  D-89*,  E-7 

REHALL 

E-8 

REWIND 

2-2-3,  2-4-3,  5-2-6,  5-4-3,  5-5-4, 
B-48*.  D-89*,  E-8 

Re-execute 

D-84 

RFL 

5-2-2,  5-2-9,  5-6-3,  D-90*,  E-4,  E-8 

RIM 

1-3-2 

RJE  terminal 

G-2 

RMl 

1-1-3*,  1-3-1,  C-2 

ROLLJOB 

2-2-1,  B-48* 

Root  segaent 

2-6-13,  5-6-6 

Route 

D-104 

ROUTE 

5-2-6,  D-90*,  E-l,  E-8 

RTIME 

5-2-2,  D-91* 

RUN 

E-4,  E-5,  E-7,  E-8 

IS 

5-2-4,  D-5*,  E-9 

SATISFY 

5-2-9,  5-6-3,  D-92*,  E-8 

SAVE 

2-1-13,  2-2-2,  2-6-10,  5-2-7,  B-6, 
B-48*,  C-20*,  D-6,  D-92*,  E-2,  E-8 

Scalar 

2-1-1 

Schedule 

G-l,  G-2,  G-3,  G-4 

SCOPY 

5-2-6,  D-92*,  E-6 

Scratch 

2-1-1,  2-6-9 
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Screen 
SCREEN 
Screen  node 
Scroll 
SCRUB DS 

Search  order 

Sector 

SECURE 

SECURE  job  date 
Security 

SEGLDR 

SEGLDR  directive 

SEGLOAD 

Segaent 

SEGMENT 

Segaentation 

Segmentation  caution 

SELDUMP 

SELLOAO 

Seaicolon 

Send 

SEND 

Senee  switch 
SEQ 

Sequence 
SEQUENCE 
Service 
Service  class 
Session 


5-3-2,  C-ll,  D-48 

5-1-3,  5-1-5,  5-2-3,  D-93*,  E-8 

D-93 

C-21,  D-68 
B-49* 

B-37 

B-52 

2-1-4*,  B-36 

1- 2-2,  3-1-1 

2- 2-5,  2-6-1*,  2-6-8*.  B-49*,  E-5, 
E-6,  E-8 

2-6-2* 

5-6-4,  E-8 

2-6-1,  2-6-9,  2-6-10,  2-6-11,  5-6-6 

2-6-10,  2-6-12 

2-6-8,  5-6-2,  5-6-4,  B-49 

2-6-13,  5-6-6 

D-10,  E-l 

E-l 

2-6-2,  A-4 

D-33 

E-8 

2-2-7,  B-55,  C-25,  D-78,  D-79,  D-105 
2-4-2 

H-2 

5-4-3 

4-1-1,  G-l,  G-2,  G-3,  G-4,  G~5 

2-1-4 

C-15 


SET 

SET  HOST 
SET  PASSWORD 
SET  (Proc) 


2-1-13,  2-2-1,  5-2-1,  B-50* ,  D-94*, 
E-8 

4- 1-5 

1-2-2,  4-1-2*,  E-9 

5- 3-4* 


SET  PROTECTION 
SET  TERMINAL 
SET  VERIFY 
SETASL 
SETCORE 


E-7 

C-21*,  E-8 
E-3 

5-2-2,  D-95* 
5-2-2,  D-95* 


SETFS 

SETJOB 

SETJSL 

SETNAME 

SETPR 


5-2-6,  D-96* 
5-2-3,  D-96* 
5-2-3,  D-97*,  E-5 

£-3 

5-2-3,  D-97* 
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SETTL 

SFUNLIB 

Shift 

SHOW 

SHOW  QUEUE 

SHOW  QUEUES 
SHOW  SYSTEM 
SHOW  USERS 
Shredder 
SI 

SID 

Sign 

SIKII5 

Simple  procedure 
Simscript 

Single  space 

SITUATE 

Size 

Skip 

SKIP 

SKIPB 

SKIPD 

SKIPEI 

SKIPF 


SKIPFB 

SKIPR 

SKIPU 

Slave 


5-2-3,  D-97*.  E-4 

5-7-1 

D-26 

2-1-13,  5-2-5,  D-97*,  E-l,  E-8 
E-6,  E-7 

C-22* 

E-5 

4- 1-3,  E-8 

1- 2-3 
D-106 

2- 2-5,  2-6-7,  B-50* 

H-5,  H-6,  H-7 

5- 7-1 

2-3-1,  2-3-4 

1- 3-2 

D-26 

E-8 

B-7 

2- 3-1,  5-3-1,  D-36,  D-57 
5-2-1,  D-36,  D-98*,  E-8 

E-8 

2-2-3,  B-51*.  E-4,  E-8 

5-2-6,  D-98*,  E-4 

2-2-3,  2-4-3,  5-2-6,  5-4-3,  B-51*, 

D-98*,  E-8 

5-2-6,  D-99*,  E-2,  E-8 

2-2-3,  5-2-6,  B-51*,  D-100*,  E-2, 

E-8 

2-2-3,  B-52*,  E-8 
D-121,  D-122 


SLOAD 
Slot  tape 
SLT 
SMP 
SMTP 


5- 2-9,  5-6-3,  D-100*,  E-8 

6- 1-2 
2-6-8 
1-3-2 
4-1-6 


SNAP 

Software 

Sort 

SORT 

SORT5 


2-1-13,  C-23* 

1- 3-1*,  5-7-1,  G-5 
D-101 

2- 2-5,  B-52*,  D-101*,  E-6,  E-8 
D-101*,  E-8 


Sort/merge 

Source 

Source  program 

SPM 

SPY 


B-52 

2-4-1, 

4-5-1 

1-3-2 

1-3-2, 


5-4-1, 

2-2-3, 


5-4-6, 

B-53*, 


B-55 

E-7, 


E-8 
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SRU 

D-37,  D-95,  D-97,  D-104 

SSH1-SSW6 

2-2-7 

Stage 

2-1-1,  B-26,  C-19,  C-20,  C-22,  C-24 

Staging 

2-2-2 

Start 

C-15,  D-71,  D-123 

STATCLASS 

2-1-13,  C-23* 

Station  eonand 

C-7 

Station  ID 

1-1-2* 

Statistics 

B-44 

STATLIB 

5-7-1 

Status 

5-2-4,  B-46,  C-15,  C-23,  D-5,  D-18, 
D-29,  D-37,  D-64,  D-96,  D-123,  D-125, 
G-5 

STATUS 

2-1-13,  2-1-16,  C-23*,  E-l,  E-8 

STATUS  (ICF) 

D-125* 

STIME 

5-2-3,  D-104*,  E-l 

STOP 

E-4,  E-5 

Storage 

6-1-1 

STORAGE 

2-1-13 

Store 

B-41 ,  C-ll 

STORE 

E-8 

Stranger  tape 

6-1-3 

String 

B-2*,  D-l* 

String  comparison 

2-2-6 

String,  literal 

2-2-7 

String,  parenthetical 

2-2-7 

Structure,  logic 

2-2-4 

Subexpression 

2-2-6 

Submit 

D-28,  D-29 

SUBMIT 

2-1-1,  2-1-9,  2-1-13,  2-2-2,  4-1-4, 

5-2-3,  B-54*,  C-24*,  D-104*,  E-l, 

E-8 

Subprogram 

4-2-1,  4-4-1 

Substitute 

2-6-4 

Substitution,  parameter 

2-3-1,  2-3-3* 

Subsystem 

5-2-3,  D-5,  D-8,  D-48,  D-78 

Sub-topic,  help 

4-2-2*,  4-2-3,  4-2-6,  4-2-7 

Suggestions 

1-2-3 

Summary 

B-36 

SUMMARY 

E-8 

Support 

G-5 

Suspend 

C-12,  C-18 

SUSPEND 

2-1-16 

SUSPEND  (ICF) 

D-125* 

SNITCH 

2-1-13,  2-2-1,  5-2-3,  B-55*,  C-25*, 
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SWITCH 

Symbol 

Symbolic  variable 

SYMBOLS 

SYSBOLL 


D-105*,  E-9 

2-2-7,  A- 1-3,  A-A-2 

2-2-6 

2-6-7 

E-9 


SYS ID  2-2-6 


AT 

Tab 

Table,  symbol 
TAPDMP9 

Tape 


Tape,  foreign 
Tape  label 
Tape  Librarian 


E-l 

2-1-5,  C-5 

2-6-7 

E-9 

1-2-3,  3-1-1,  5-2-7,  6-1-3,  6-1-A, 

A-A,  C-2,  C-3,  D-6,  D-10,  D-69,  D-87, 

D-106,  D-116,  Gl-1 

6-1-3 

6-1-1 

6-1-2,  G-5 


Tape,  magnetic 
Tape,  slot 
Tape,  stranger 
TCOPY 
TDU 


6-1-1,  D-12,  D-59 
6-1-2 
6-1-3 

5-2-6,  D-106*,  E-2 
5-2-3,  D-107* 


TDUMP 

TEDI 

Tektronix 

Telephone 


5-2-6,  6-1-3,  D-108*,  E-7,  E-9 

E-A,  E-7 

5-1-3 

1-1-2,  1-1-3,  1-2-1,  A-l-1,  5-1-2, 
G-5 


TELNET 

Terminal 


Terminal  Control 


1-3-2,  G-2 

A-l-1,  C-19,  C-21,  D-5,  D~7,  D-28, 
D-68,  D-8A,  D-93,  D-108,  D-121, 
D-122 
5-2-3 


Terminal  definition 
Terminate 


Terminator 


D-107 

B-31,  C-10,  C-ll,  C-1A,  C-18,  D-A, 
D-1A,  D-36,  D-5 A,  D-71,  D-121,  D-122, 
D-123,  D-125 
A-A,  B-l*,  D-12A 


Test  magnetic  tape 

Text 

TEXT 

Text  library 
Text  module 


1- 2-3 
B-3,  B-A3 
5-A-A,  B-3* 

A-5-1* 

2- 4-1,  A-5-1*.  5-A-l 


Time 

TIME 


2-1- A,  D-30,  D-37,  D-91 
2-2-6 


Page  Index-32 


Tia-UNL 


RevO 


88/06/20 


Tiae  liait 

B-36,  D-97 

Time  usage 

B-53 

TIMELEFT 

2-2-6 

Tiaesharing 

G-l,  G-2,  G-3 

TITLE 

2-6-7 

TOFACS 

4-1-1,  4-1-5*,  G- 

Topic,  help 

4-2-2*,  4-2-3,  4-: 

TPU  (EVE) 

4-1-4,  E-4,  E-7 

Training 

G-5 

TRANS F 

E-9 

Transfer 

3-1-3,  B-14,  D-9 

Transfer  file 

4-1-5,  D-120 

Transfer  funds 

1-1-1 

Transparent 

B-2*,  B-40,  B-41 

transpf 

E-9 

TREE 

2-6-10,  2-6-11,  2- 

Tree  diagram 

2-6-12,  5-6-5 

Tree  structure 

2-6-9,  2-6-10*,  2- 

TRIAL 

2-6-7 

Trillion-bit  storage 

G-3 

TRMDEF 

5-2-3,  D-108*,  E-8 

Trouble  Fora 

1-2-3 

TRUE 

H-4 

Truncate 

D-71 

TURNKEY 

E-9 

Two's  coaplement 

H-3 

.TXT 

4-5-1 

Type 

5-5-1 

TYPE 

5-5-4 

UBBLOCK 

2-2-3 

UITLITY 

5-7-2 

Ujn 

E-5 

ULIB 

5-2-8, 

D-109*,  E-5 

Ultrix-32 

G-4 

UN 

D-3* 

UNBLOCK 

B-55* 

Unblocked 

6-1-1 

Unblocked  dataset 

B— 11, 

B-23,  B-52,  1 

Underline 

2-3-3 

Underscore 

4-2-3 

Uninitialized  data  area 

2-6-6 

Unique  access 

B-3* 

Unlabelled 

6-1-1, 

6-1-3 

UNLOAD 

5-2-6, 

D-110*,  E-2, 

!,  G-4 
-6,  A-2-7 


6-12,  5-6-4 
6-11* 


-55 


E-9 
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Unlock 

B-35 

UNLOCK 

5-2-6,  0-110* 

Unsatisfied  external 

2-6-7,  D-92 

UNYANK 

2-4-4 

UPDATE 

2-2-4,  2-4-1*,  5-2-8,  5-4-1*,  5-4-5, 

5-4-6,  B-10,  B-55*,  D-110*,  E~9 

UPDATE  directive 

5-4-1 

Upper  case 

2-4-1 

UPROC 

5-2-3,  D-114* 

Up-arrow 

2-1-10,  4-2-6 

USER 

5-2-3,  D-114*,  E-2 

User  Initials 

1-1-1,  1-2-1*,  2-1-10,  4-1-2,  5-1-2, 
Gl-1* 

User  library 

D-66,  D-109 

User  nane 

D-3*,  D-117 

User  Services 

G-5 

Userid 

Gl-1 

Usernaae 

4-1-2,  4-1-3,  Gl-1 

Users,  list  of 

D-118 

User-break-1 

D-4 

User-break-2 

D-4 

USX 

2-6-7 

UTILITIES 

4-2-1,  4-5-1 

Utility 

2-2-2,  2-2-3,  5-2-8 

UTILITY 

2-5-1,  5-5-5,  B-5 

Validate 
Variable 
Variable  length 
Variable,  ayabolic 
VAX 

VAX  11/780 
VAXcluater 

Vector 

Vector  register 

Vendor 

Verify 

VERIFY 

Version 

VERYoldnews 


B-5,  B-7,  D-17,  D-68,  D-114 

2- 2-7,  B-50 
6-1-1 
2-2-6 

F-l,  H-2,  H-6 
G-2,  G-4 

1- 1-3,  1-3-1,  2-1-1,  2-1-5,  2-1-10, 

3- 1-5,  4-1-1*,  6-1-4,  7-1-1,  G-2 

2- 1-1 
B-28 

5-7-1 

5-5-4 

5-2-6,  D-115*,  E-2 

4- 1-2,  4-1-4* 

4-1-2 


VFYLIB 
Viking  721 
VMS 


5-2-8,  5-5-4,  D-116*,  E-2 
5-1-3 

4-1-1*,  C-l,  C-20,  F-l,  H-2 
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VMS  Cray  Station 
Volume  aerial  number 
VSN 

VT-100,  DEC 
VI 

V2 

V3 

V4 


2-1-10*.  2-1-11 
D-59.  D-116 

6~1_2>  6-1-3,  D-116*, 
5-1-2,  5-1-3 
1-1-3*,  G-2 

1-1-3*,  G-2 
1-1-3*,  G-2 
1-1-3*,  G-2 


Warning 

WARNING 

WEOF 

WHATJSN 


2-6-1,  4-1-2 
E-9 

2-4-2,  5-4-2 


WHILE 

5-2-5,  D-117* 
5-2-1,  D-37, 

WHO 

Width 

1>-118*,  E-8 

WIDTH 

C-22 

Wildcard 

2-4-2,  5-4-2 

Window 

4-2-5,  4-4-2, 
C-21 

WINS2  ,  .  . 

WIN/TCP 

**-1—6 

Word 

1-3-2 

Word  format 

H-5,  H-6,  H-7 
H-3 

E-l 

Word  length 

Writ*  _ 

WRITE 

D-  70 

WRITEDS 

E-3,  E-7 

WRITEF 

2-2-3,  B-58* 

WRITER 

5-2-6,  D-1I8*, 
5-2-6,  D-119*, 

X 

X,  BASIC 

XEQ 

XEROX 

Xerox  8700 


5-2-5,  D-119*,  E-4 
D-8*,  D-119*,  E-l 
E-9 

E-l,  E-8 
C-6 


XMODEM 


5-2-5,  D-120* 


E-9 

2-4-4,  5-4-3 
5-4-3 
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E-9 


4* 


■  .*• 


AY 

YANK 

YANKDECK 


) 
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2  -D 
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a2 

Zero 

Zero-byte 


2-1-10,  2-1-11,  4-2-6,  C-12*,  E-9 

B-49,  H-4 

A-4 


II 

11/780,  DEC  VAX 


5-2-4,  D-4*,  E-9 
1-1-3*,  G-2,  G-4 


22 


5-2-4,  D-4*,  E-9 


63- character  set  A-4*,  H-2 

64- character  set  A-4*,  H-2 


750,  CDC  CYBER 
7-track 


G-3,  H-3,  H-7 
6-1-1,  6-1-3 


8250,  DEC  VAX 
8550,  DEC  VAX 
860,  CDC  CYBER 
8-bit 


1-1-3*,  4-1-1,  G-2 
1-1-3*,  4-1-1,  G-2 
1-1-2,  G-3,  H-3,  H-7 
4-1-1 


9-track 


6-1-1,  6-1-3,  6-1-4 


$! 


E-9 


$BLD 

$CS 

$DEBUG 

$D0MP 

$IN 


E-5 

2-1-3*.  2-3-1 
2-6-7 
B-28 
2-1-3 


$LOG 

$OUT 

$PROC 


2-1-3,  B-36 

2-1-3* 

2-3-1* 


IA 

ID 


E-9 

5-2-4,  D-5* 
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5-2-4,  D-5* 
5-2-4,  D-5*,  E-9 
5-2-4,  D-4* ,  E-9 
5-2-4,  D-4*,  E-9 


E-9 


Initial  Distribution 


Copies: 

12  Director 

Defense  Technical  Information  Center  (DTIC) 

Cameron  Station 

Alexandria,  Virginia  23314 


Center  Distribution 


Copies: 


1 

1 

2 

1 

1 

1 

1 

1 

1 

1 

1 

1 

150 

20 

1 

1 

1 

1 

1 
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189  Cray,  G.  R. 
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1893  Minor,  L.  R. 

1893  Strickland,  J.  D. 

1893.1  Willner,  S.  E. 

1893.1  Soncr,  D.  V. 

1895  Glover,  A. 

1896  Annapolis  Computer  Center 
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